介紹如何在 Excel VBA 中使用 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否

設定圖示

' 設定圖示

Response = MsgBox("執行成功！", vbInformation)

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

常數值描述vbCritical16顯示嚴重訊息圖示。vbQuestion32顯示問號圖示。vbExclamation48顯示警告訊息圖示。vbInformation64顯示資訊訊息圖示。如果需要同時設定按鈕與圖示，就將對應的代碼相加即可：

' 設定按鈕與圖示

Response = MsgBox("是否繼續？", vbYesNo + vbQuestion)

設定按鈕與圖示

設定標題

' 設定按鈕與標題

Response = MsgBox("執行成功！", vbOKOnly, "結果")

設定標題參考資料：Office 開發人員中心