How to goto in VBA

Hello Gazzer,

The code below with set the active cell to Column "A" in the same Row.

R = ActiveCell.Row
ActiveSheet.Cells(R, 1).Select

To use the code with a given Range...

With Range("$D$10")
R = .Row
.Cells(R, 1).Select
End With


Hope this helps,
Leith Ross