How do you store the col letter and the row number into a variable

Thanks,
GJ

var = activecell.Address(0,0)

rw = ActiveCell.Row
col =
Left(ActiveCell.Address(0,0),Instr(2,ActiveCell.Ad dress,"$",vbTextcompare)-2)

Demo'd from the immediate window
Range("B9").Select
?
Left(ActiveCell.Address(0,0),Instr(2,ActiveCell.Ad dress,"$",vbTextcompare)-2)
B
Range("IV10").Select
?
Left(ActiveCell.Address(0,0),Instr(2,ActiveCell.Ad dress,"$",vbTextcompare)-2)
IV

--
Regards,
Tom Ogilvy



"gj" wrote in message
ups.com...
How do you store the col letter and the row number into a variable

Thanks,
GJ