質問: Excel VBA ボタンに情報を埋め込む方法
回答: 挿入する、ボタンは、開発リボンの挿入から、ActiveX コントロールにあるボタンを登録するのか 一番簡単です。 デザインモードで、クリックすると各シートに、 Private Sub CommandButton1_Click() End Sub が出来ますので、そこに 処理 (1) を記述します。 フォームコントロールのボタンを挿入した場合は、マクロの登録から、新規作成で作成します Sub ボタン1_Click() 処理 (1) 'これを張り付けます End Sub が、標準モジュールに記載されますので、そこに張り付ければよいでしょう Sub 処理(i) ・・・・・ 下の処理を入れてください End Sub も下に張ります こんな感じでいかがですか? SUB で 処理を定義します。 Private Sub CommandButton1_Click() 処理 (1) End Sub Private Sub CommandButton2_Click() 処理 (2) End Sub Private Sub CommandButton3_Click() 処理 (3) End Sub Sub 処理(i) If i = 1 Then MsgBox "hoge1" ElseIf i = 2 Then MsgBox "hoge2" ElseIf i = 3 Then MsgBox "hoge3" End If End Sub