A simple one:
Sub Test()
colname = InputBox("Enter column")
'This is the one that does the trick
outp = Columns(colname).Column
MsgBox ("col no is " & outp)
End Sub

slymeat (donotspam) wrote:
Anybody have some code to convert a column letter to it's column number
equivalent?
--
Andrew