MsgBox関数のbuttons引数の指定方法は?

Question 017k Previous Next
77ページ [3-1-9図] ◆ 環境・・ Excel 2000 & Windows XP
詳細は こちら
申し訳ありません。
77ページのボタンの種類とアイコンのスタイルの設定方法ですが、「vbExclamation+vbYesNo」 の入力方法は本文の通りでしょうか。 アイコンのスタイルは出なく、ボタンの種類は 「はい」のみです。
以下の通り入力しましたが違いますか。お教え下さい。宜しくお願い致します。
Private Sub Workbook_Open()
    MsgBox "権限をお持ちですか", vdExclamation + vdYesNo, "閲覧制限されたブックです"
End Sub
Answer   Copyright (C) 2003.12.28 永井善王
「ExcelVBAマクロ組み方講座」をご購読いただき、ありがとうございます。

単なる入力ミスのようですね。
v
d' となっているところを、'vb' に修正すれば本文どおりになるはずです。 正しくは、
Private Sub Workbook_Open()
    MsgBox "権限をお持ちですか", vbExclamation + vbYesNo, "閲覧制限されたブックです"
End Sub
となります。 お試しください。

 

Excel VBA Macro