-
8...
[VBA]
Sub ColumnLetter3()
Dim Addy As String
Addy = ActiveCell.EntireColumn.Address(0, 0)
MsgBox Left(Addy, Int(Len(Addy) / 2))
End Sub
[/VBA]
You know you're really in trouble when the light at the end of the tunnel turns out to be the headlight of a train hurtling towards you 
The major part of getting the right answer lies in asking the right question...
Made your code more readable, use VBA tags (this automatically inserts [vba] at the start of your code, and [/vba ] at the end of your code) | Help those helping you by marking your thread solved when it is.
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
Reply With Quote