ExcelVBAでフォーム(ボタン)のあるセルの位置を取得


MsgBox ActiveSheet.Shapes(Application.Caller).TopLeftCell.Address

MsgBox ActiveSheet.Shapes(Application.Caller).TopLeftCell.Row
MsgBox ActiveSheet.Shapes(Application.Caller).TopLeftCell.Column