Columns

[Clark B]

Hi!

I am interested in getting the column of a cell.
If cell D1 is selected and I use this code...

Msgbox Activecell.Column

....then I get 4 inth msgbox. How can I get 'D'?

Regards

Clarkie

 

[steve]

Clark,

from Chip Pearson (found with Google Search)

ColLetter = Left(Cells(1, ColNumber).Address(True, False), _
1 - (ColNumber > 26))

steve

 

[Bob Phillips]

Clark,

Use

MsgBox Chr(ActiveCell.Column + 64)

 

[Clark B]

Thanks, works like a charm

Clarkie

Clark,

from Chip Pearson (found with Google Search)

ColLetter = Left(Cells(1, ColNumber).Address(True, False), _
1 - (ColNumber > 26))

steve

 

[steve]

Clark,

You're welcome!

And did you see Bob's reply
MsgBox Chr(ActiveCell.Column + 64)

Many ways to get there from here...

Highly recommend going to
www.rondebruin.nl/Google.htm
and downloading his Google Search Add-in.
It's a great way to find past responses to questions and problems.

steve

 

[Chip Pearson]

Bob,

This will work only with columns A-Z. It doesn't work for columns
past Z.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com (e-mail address removed)