PDA

View Full Version : [SOLVED] Ofsetting Cell by 1, 0 vba



rohan8510
03-07-2015, 06:46 PM
hi, i have this code but every time it says compile error, could you please help many thanks




Range("A25").Select
Selection.End(xlUp).Select
selection.Offset(1, 0)

Yongle
03-08-2015, 01:20 AM
'Using your code
Range("A25 ").Select
Selection.End(xlUp).Select
Selection.Offset(1, 0).Select

'Same but neater
Range("A25 ").Select
Selection.End(xlUp).Offset(1,0).Select

'I use message boxes frequently as I build unfamiliar code
'This might be overkill here but shows exactly where cursor is going etc
'Message boxes can tell you a huge amount
Range("A25 ").Select
MsgBox "1 Now at " & ActiveCell.Address
Selection.End(xlUp).Select
MsgBox "2 Now at " & ActiveCell.Address
Selection.Offset(1, 0).Select
MsgBox "3 Now at " & ActiveCell.Address

rohan8510
03-08-2015, 03:12 AM
Thanks so much Yongle it was really helpful :)

jolivanes
03-08-2015, 07:29 PM
Re: Same but neater????

Range("A25").End(xlUp).Offset(1).Select
Selecting however should not be required but we need to see the rest of the code.