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