VBA フォームボタンコントロール → ActiveXボタンコントロール にするには？

Question

お世話になります。

表題の件について質問です。
Excelにおいて挿入ーフォームボタンコントロールからシートにボタンを追加し、
下記のようなメソッドができたとします。

Sub 実行()
End Sub

私はこのメソッドの中に処理を記述し、動作確認まで終了させたのですが、
後になってメソッド名はキャメル型の物に変更し、
シート上に配置するボタンはActiveXコントロールボタンにするといわれました。

要はシート状にActiveXコントロールボタンを配置し、
Sub 実行()
End Sub
の実行という文字をキャメル型に変更して、
ActiveXボタンコントロールのボタン名と呼び出すメソッドを紐づければよいと思うのですが、
ActiveXボタンコントロールの物理名（CommandButton1）と、
その物理名をModule1にある実行にどう紐づければいいのか、わからず苦戦しています。

下記状態にしてもメソッドが呼び出されません。

Sub DoHoge()
End Sub

Sub DoHoge_Click()
End Sub

ActiveXコントロールのオブジェクト名=DoHoge

どのように改善すればよいでしょうか。
お願いいたします。

Answer 1

ActiveXボタンコントロールをダブルクリックすると、DoHoge_Clickという関数が自動的に作成されると思います。
Module1に作成してある実行関数の中身をコピペすればよろしいかと。
実行関数の方は関数ごと削除してください。

Private Sub DoHoge_Click()
    ' ここに実行関数の中身をコピペ
End Sub

Module1の実行関数はそのままに、DoHoge_Clickから実行を呼び出したいというのであれば、Call 実行でいけると思います。

Private Sub DoHoge_Click()
    ' 実行関数を呼び出す
    Call 実行
End Sub