EXCEL ActiveX コマンドボタンで実行する前にいったんmsgBoxで確認を求めたい

excelにて、複数のシートからなるBookを作成中
ActiveXコントロールで複数のシートにある全部の入力／変更されうるセルの値を初期値に戻すようにしています。
しかし、誤ってクリックしてしまうと、それまでに入力した値がすべて消えたり初期値に戻る。
ボタンをクリックすると、いったんメッセージボックスを表示して
「続行」「キャンセル」
を選択させたい。
既存のコードに何を追加するのでしょう。

No.1 ベストアンサー 回答者： fujillin 回答日時： 2022/07/06 19:56

こんばんは

ボタンに登録されたマクロを実行しているのですよね？

であるなら、例えば、こんな感じでいかがでしょうか？

If MsgBox("続行しますか？", vbYesNo) = vbNo Then Exit Sub

この回答へのお礼

早速ありがとうございます。意外と簡単でした。
ちょっとmsgBoxがしょぼいので、工夫してみます。

お礼日時：2022/07/07 11:38