マクロのメセッージボックスについて相談です

質問

MsgBox "開けますか？"
Workbooks.Open Filename:= _
"指定ファイル"
End Sub
と現在使用していますが、メッセージボックスにキャンセルボタンを付け、キャンセルボタンや×ボタンでキャンセル出来るようにしたいのです。
どのようなコメントを記載すればよいでしょうか？
初心者ですがよろしくお願いいたします。

回答No.1

papayuka · ベストアンサー

Msgboxの戻り値を利用します。

If MsgBox("開きますか？", vbOKCancel + vbQuestion, "確認") = vbOK Then
' OK時の処理
End If

補足

うまくいきませんが・・・

回答No.2

papayuka

> うまくいきませんが・・・

Excelですよね？
試して上手く行かないコードを載せて下さい。

お礼

嬉しい返事ありがとう御座います。
参考に教えて頂いたマクロを試してみたのですが、メッセージボックスの×ボタンをクリックしても消えませんでした。・・・でしたので色々検索し思考錯誤した結果、キャンセルで行いたいことが出来ました。
力になって頂きありがとうございます。また教えてくださいね