Both relative and absolute reference in a macro

[taxigogo]

I have a table of data that I want to be able to copy a cell in an absolute column but relative to the row of the selected cell.

Eg. I select B2 and it copies A2
I select C3 and it copies A3
I select D5 and it copies A5

I see how to have a constant offset of the Activecell but not an absolute column reference.

Is this possible or would it require a series of IF, THEN clauses changing the offset for each table of the column?

 

[jasonb75]

Perhaps something on the lines of

intersect(range("a:a"),activecell.entirerow).copy

 

[Eric W]

Or

Cells(ActiveCell.Row, "A").Copy

 

[taxigogo]

Perhaps something on the lines of

intersect(range("a:a"),activecell.entirerow).copy

Fantastic that works perfectly!

 

[jasonb75]

works perfectly!

So does @Eric W's simpler suggestion.