select a cell and the one next to it

D

Donna S

I'm trying to select the cell below the one I'm in and the cell to the right
of the one below where I am. I know how to select a cell below the cell I'm
in by useing the ActiveCell.Offset(1,0).select but I don't know how to select
the one to the right of it at the same time. Please help.
 
G

Gary''s Student

Sub Macro()
i = Selection.Row
j = Selection.Column
Range(Cells(i + 1, j), Cells(i + 1, j + 1)).Select
End Sub
 
E

Earl Kiosterud

Donna,

Seems to me there's a cleaner way, but this seems to work:

Cell1 = ActiveCell.Offset(1, 0).Address
Cell2 = ActiveCell.Offset(0, 1).Address
Range(Cell1 & "," & Cell2).Select

Or you can combine them, though it is harder to debug:
Range(ActiveCell.Offset(1, 0).Address & "," & ActiveCell.Offset(0,
1).Address).Select

Earl Kiosterud
www.smokeylake.com
 
Top