excel - COLUMN() に相当する VBA は何ですか?

Question

それはこのように見えるでしょう

Function COL()

   COL = WorksheetFunction.Column()

End Function

Answer 1

Application.Callerは、列を取得できるセルへの参照を提供します。例えば

Public Function COL()
    Select Case TypeName(Application.Caller)
    Case "Range"
       COL = Application.Caller.Column
    Case Else
       COL = "unknown"
    End Select
End Function