How to return column number

[moonhk]

Hi All

How to return column number ? I want return 4 not D.
Below is my coding,
MsgBox ActiveCell.SpecialCells(xlLastCell).Address '~~ $D$6
RowCnt = InStr(2, ActiveCell.SpecialCells(xlLastCell).Address,
"$", 0)
MsgBox Left(ActiveCell.SpecialCells(xlLastCell).Address, RowCnt -
1) '~~ $D

Moonhk

 

[Guest]

MsgBox ActiveCell.SpecialCells(xlLastCell).Column

Regards,
Stefi

„moonhk†ezt írta:

 

[Guest]

The row and column properties of the range object will return what you need.
ie if the active cell is in D2 then:
Activecell.coumn = 4
Activecell.row = 2

 

[moonhk]

The row and column properties of the range object will return what you need.
ie if the active cell is in D2 then:
Activecell.coumn = 4
Activecell.row = 2







- -

Thank a lot

 

[moonhk]

The row and column properties of the range object will return what you need.
ie if the active cell is in D2 then:
Activecell.coumn = 4
Activecell.row = 2







- -

Thank a lot