ユーザー定義関数が入力されているセルのアドレスを取得する方法は2つ
ThisCellプロパティで取得する
Function GetAddr() GetAddr = Application.ThisCell.Address(False, False, xlA1) End Function
Callerプロパティで取得する
Function GetAddr2() GetAddr2 = Application.Caller.Address(False, False, xlA1) End Function
※.AddressはRangeオブジェクトのAddressプロパティ
取得する値の形式を変えたい場合はAddressプロパティで指定する。