excel利用msgbox函式來避免誤操作關閉程式?

excel利用msgbox函式來避免誤操作關閉程式

excel利用msgbox函式來避免誤操作關閉程式

工具/原料

excel2013

更多經驗請關注,如果幫到了你,請在上方給個投票謝謝支援。好人一生平安。

先頂後看年薪百萬,如果幫到了你,幫忙給個好評,這對小編很重要,萬分感謝。

方法/步驟

首先讓我們開啟一個工作樣表作為例子。

excel利用msgbox函式來避免誤操作關閉程式

按下alt+f11進入vba編輯模式,並插入一個新模組命名為msg。並在模組內定義a=msgbox(),按下F5執行後,會彈出一個空白的對話方塊。

excel利用msgbox函式來避免誤操作關閉程式

msgbox的引數與inputbox的引數類似,這裡需要提出來的是

Value=MsgBox(prompt[,buttons][,title][ ,helpfile,context])

這裡面buttons引數為陣列組合,並且有規定的常量或數值,大家需要熟記一下。

當然也可以藉助vba的自動提示功能來輔助記憶。

excel利用msgbox函式來避免誤操作關閉程式

為了防止excel工作表被誤關閉,我們需要這樣做。首先在左側工程編輯欄中選擇通用表格。

excel利用msgbox函式來避免誤操作關閉程式

雙擊thisworkbook後在右側物件選項和動作選項中分別選擇workbook和beforeclose來建立一個模組。

excel利用msgbox函式來避免誤操作關閉程式

輸入以下程式碼

Dim intreturn As Integer

intReturn = MsgBox("退出程式嗎?", vbYesNo + vbQuestion, "提示")

If intReturn <> vbYes Then Cancel = True

這裡解釋一下定義return變數為一個整數值,當變數RETURN不為yes時,則所有操作取值取消。

excel利用msgbox函式來避免誤操作關閉程式

輸入完成好,我們切換回excel工作表,點選右上角x關閉工作表,會彈出提示。至此本次操作正確。

excel利用msgbox函式來避免誤操作關閉程式

注意事項

謝謝你的投票。

相關問題答案