介紹如何在 Excel VBA 中使用 MsgBox 建立各種對話方塊視窗,顯示文字訊息以及按鈕。

顯示文字訊息

將一般的文字訊息傳入MsgBox 即可以視窗的方式顯示該訊息:

' 顯示文字訊息
MsgBox("執行成功!")

顯示文字訊息

詢問問題

若要詢問使用者問題,並取得使用者所選擇的答案,可以在第二個參數中指定要顯示的按鈕,然後從 MsgBox 的傳回值取得使用者的回答:

' 設定按鈕
Response = MsgBox("是否繼續?", vbYesNo)

' 處理傳回值
If Response = vbYes Then  ' 使用者選擇「是」
    MyString = "Yes"
Else                      ' 使用者選擇「否」
    MyString = "No"
End If

詢問問題

以下是 MsgBox 可用的按鈕代碼常數與說明:

常數描述
vbOKOnly0僅顯示「確定」按鈕。
vbOKCancel1顯示「確定」與「取消」按鈕。
vbAbortRetryIgnore2顯示「中止」、「重試」與「略過」按鈕。
vbYesNoCancel3顯示「是」、「否」與「取消」按鈕。
vbYesNo4顯示「是」與「否」按鈕。
vbRetryCancel5顯示「重試」與「取消」按鈕。

當使用者按下按鈕後,可能的傳回值與說明如下,透過這些值就可以判斷使用者所選擇的答案:

常數描述
vbOK1確定
vbCancel2取消
vbAbort3中止
vbRetry4重試
vbIgnore5略過
vbYes6
vbNo7

設定圖示

MsgBox 的第二個參數亦可用來設定圖示:

' 設定圖示
Response = MsgBox("執行成功!", vbInformation)

設定圖示

MsgBox 可以使用的圖示代碼常數與說明如下:

常數描述
vbCritical16顯示嚴重訊息圖示。
vbQuestion32顯示問號圖示。
vbExclamation48顯示警告訊息圖示。
vbInformation64顯示資訊訊息圖示。

如果需要同時設定按鈕與圖示,就將對應的代碼相加即可:

' 設定按鈕與圖示
Response = MsgBox("是否繼續?", vbYesNo + vbQuestion)

設定按鈕與圖示

設定標題

MsgBox 的第三個參數可用來設定視窗的標題:

' 設定按鈕與標題
Response = MsgBox("執行成功!", vbOKOnly, "結果")

設定標題

參考資料