
押したボタンの位置を取得したいのですが、
多数あるボタンのマクロを同じマクロにしたいのです。
自分で検索したところ、下記のところまではわかったのですが
ボタン名をひとつひとつ指定しなくてはなりません。
MsgBox ActiveSheet.OLEObjects("CommandButton1").TopLeftCell.Address
"CommandButton1"の所を、「いま押したボタン名」と指定できれば
できるのではないかと考えていまが、そもそもコマンドボタンの場合
ボタン数の分マクロを入力しなくてはならないので、
オートシェイプのボタンに統一の同じマクロを登録できれば、
そちらのほうがいいです。
どうかよろしくお願いします。
A 回答 (1件)
- 最新から表示
- 回答順に表示
No.1
- 回答日時:
表示/ツールバー/コントロールツールボックスのボタンでなく、表示/ツールバー/フォームのボタンなら、下記の様に、置かれているアドレスが取得できます。
(マクロは全てのボタンに共通でOKです)なお、当方XL2000です。Sub ボタン_Click()
MsgBox ActiveSheet.Shapes(Application.Caller).TopLeftCell.Address
End Sub
できました!
ボタンもコピーすればマクロが登録されているし、
簡単に同じボタンを、たくさん作る事ができます。
ありがとうございます!
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教えるわが家の防犯対策術!
ホームセキュリティのプロが、家庭の防犯対策を真剣に考える 2組のご夫婦へ実際の防犯対策術をご紹介!どうすれば家と家族を守れるのかを教えます!
-
VBAでマクロを登録したボタンの位置からオフセットした行に別シートの複数行を挿入したい
Excel(エクセル)
-
エクセルのコマンドボタンの位置をVBAで指定できませんか?
Excel(エクセル)
-
VBA シートのボタン名を変更したい
Visual Basic(VBA)
-
4
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
5
コマンドボタンがあるかどうかを取得するには?
PowerPoint(パワーポイント)
-
6
Excelのマクロでボタンを押すと数が1足されるようにするには?
IT・エンジニアリング
-
7
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
8
VBAでエクセルシートを更新(リフレッシュ)する方法を教えて下さい。
Excel(エクセル)
-
9
Excel VBA Application.caller エラー2023について
Visual Basic(VBA)
-
10
マクロ実行ボタンを自動削除したい
Excel(エクセル)
-
11
セルをマクロのボタンにしたい。
Visual Basic(VBA)
-
12
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
13
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
14
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
15
CommandButtonのCaptionを変化させたい
Visual Basic(VBA)
-
16
Excelのセルにユーザー名を表示する方法
Excel(エクセル)
-
17
別のシートから値を取得するとき
Visual Basic(VBA)
-
18
Excel VBAでのWorksheet_Changeが動作しない原因
Excel(エクセル)
-
19
Application.ScreenUpdating = Falseが効きません
Visual Basic(VBA)
-
20
エクセルでObjectがあるセル番地を取得するマクロは?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
スクロールしてもボタンを常に...
-
5
ShowAllDataのエラーを回避したい
-
6
コマンドボタンで「終了ボタン...
-
7
エクセルVBA
-
8
コマンドボタンがあるかどうか...
-
9
ホームページビルダーで「戻る...
-
10
マクロ登録ボタンに色をつける
-
11
PPTのコマンドボタンがクリック...
-
12
EXCELのシート名を指定してその...
-
13
Excel VBA --- コマンドボタ...
-
14
エクセルVBAでOptionButtonのオ...
-
15
エクセルのVBAでランダムに表示...
-
16
[ExcelVBA] コマンドボタンを押...
-
17
コマンドボタンの画像も拡大表...
-
18
エクセルVBA シート上にあるコ...
-
19
EXCELでNo.を変えて印刷したい
-
20
Excelシート上でボタン1つで交...
おすすめ情報
公式facebook
公式twitter