Hi luv2glyd
use "Range("myCell").Column"
Sub tested()
Debug.Print Range("myCell").Column
Cells(5, 3).Select
End Sub
Cells( Row number, column Number)

a1 is cells (1,1)