End(x1Left) to column a

[ORLANDO V]

Anyone know how I can offset from the active cell to the leftmost column a.

I have been trying Selection.End(x1Left).Select but that doesn't work since
I don't know how many columns to the left column a is each time. Sometimes
it may be 65 columns to the left, othertimes just a few columns to the left.

What command would you use?
Thank you.

 

[John Bundy]

i would just do something like this
myRow = ActiveCell.Row
Cells(myRow, 1).Select

 

[Jim Thomlinson]

Try...

Cells(activecell.row, "A").Select

 

[Per Jessen]

Hi

Selection.End(xlToLeft).Select will only work if all cells between column A
and the selected cell contain a value.

Use this instead

CurrentRow = ActiveCell.Row
Cells(CurrentRow, 1).Select

Regards,
Per

 

[ORLANDO V]

This worked great. Thank you.
You made it look simple too !

 

[ORLANDO V]

Thank you. Worked great !

Hi

Selection.End(xlToLeft).Select will only work if all cells between column A
and the selected cell contain a value.

Use this instead

CurrentRow = ActiveCell.Row
Cells(CurrentRow, 1).Select

Regards,
Per

 

[ORLANDO V]

This worked great. Thank you.

i would just do something like this
myRow = ActiveCell.Row
Cells(myRow, 1).Select