読者です 読者をやめる 読者になる 読者になる

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

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

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

ネタ元