Determine Column Number in a function

[cubbybear3]

I have a function that needs to know the column number/letter of the
cell calling it. How does a novice like myself do this? Thanks. -
pb

 

[Bob Umlas]

Function ColNum() As Integer
ColNum = Application.Caller.Column
End Function

Just enter =ColNum() in a cell.
However, =COLUMN() does that already!

 

[Ronald Dodge]

Here's an example of the Caller Property you would use on the application
within the custom function.

Dim v as StringSelect Case TypeName(Application.Caller)
Case "Range"
v = CStr(Application.Caller.Column)
Case Else
v = "unknown"
End Select
MsgBox "Column number calling this function is " & v & "."-- Sincerely,
Ronald R. Dodge, Jr.
Master MOUS 2000