ちょっと生きづらさを抱えた人へ、気持ちを楽にするためのお手紙です。

【VBA】ボタンのあるセルの位置を取得する

筆箱にカンニングペーパーを入れる係のみすくです。こんにちは。
VBA関連だけまとめたブログもあります。
筆箱VBA

クリックしたボタンが、シート上のどこにあるのかを
取得します。

Option Explicit

Public Sub getButtonPosition()
    Debug.Print "アドレス:" & ActiveSheet.Shapes(Application.Caller).TopLeftCell.Address
    Debug.Print "行:" & ActiveSheet.Shapes(Application.Caller).TopLeftCell.Row
    Debug.Print "列:" & ActiveSheet.Shapes(Application.Caller).TopLeftCell.Column
End Sub

コメントを残す

メールアドレスが公開されることはありません。

CAPTCHA