久久精品国产99国产精品,农村大炕弄老女人,人马配速90分钟,香蕉成人伊视频在线观看

使用Excel的MsgBox函數來避免誤操作關閉程序

示例工作樣表首先,讓我們打開一個工作樣表作為例子。進入VBA編輯模式按下ALT F11進入VBA編輯模式,并插入一個新模塊命名為msg。在模塊內定義a MsgBox(),然后按下F5運行后,會彈出一

示例工作樣表

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

進入VBA編輯模式

按下ALT F11進入VBA編輯模式,并插入一個新模塊命名為msg。在模塊內定義a MsgBox(),然后按下F5運行后,會彈出一個空白的對話框。

MsgBox函數的參數

MsgBox的參數與InputBox的參數類似,需要注意的是Value MsgBox(prompt[, buttons][, title][ ,helpfile,context])。這里面的buttons參數為數組組合,并且有規定的常量或數值,需要熟記一下。當然也可以借助VBA的自動提示功能來輔助記憶。

防止Excel工作表被誤關閉

為了防止Excel工作表被誤關閉,我們需要進行以下步驟:

1. 首先,在左側的工程編輯欄中選擇“通用表格”。

2. 雙擊“ThisWorkbook”,然后在右側的對象選項和動作選項中分別選擇“Workbook”和“BeforeClose”來創建一個模塊。

3. 輸入以下代碼:

```

Dim intReturn As Integer

intReturn MsgBox("退出程序嗎?", vbYesNo vbQuestion, "提示")

If intReturn <> vbYes Then Cancel True

```

這段代碼定義了一個變量intReturn為一個雙字節,當變量intReturn不等于vbYes時,則取消關閉操作。

測試功能

輸入完成后,切換回Excel工作表,點擊右上角的X關閉工作表,會彈出提示。至此,本次操作正確。

以上就是使用Excel的MsgBox函數來避免誤操作關閉程序的方法。希望本文能夠幫助到大家,如果還有其他問題需要咨詢,可以聯系小編進行咨詢。祝大家生活愉快!

標簽:
主站蜘蛛池模板: 太保市| 柘城县| 林甸县| 平潭县| 灵川县| 金堂县| 锦屏县| 布拖县| 许昌县| 双牌县| 彭泽县| 昌江| 儋州市| 雅安市| 天台县| 肃北| 石屏县| 汉沽区| 龙江县| 江达县| 乌海市| 东海县| 安义县| 十堰市| 天津市| 大方县| 华蓥市| 多伦县| 定安县| 铁岭县| 沽源县| 伊川县| 恩平市| 泸溪县| 和硕县| 朝阳县| 上林县| 阿坝| 辽源市| 湖北省| 芦溪县|