消息框函数 您所在的位置:网站首页 vba中用于弹出信息框的函数 消息框函数

消息框函数

2024-04-17 17:34| 来源: 网络整理| 查看: 265

Excel VBA中的MsgBox 函数可以返回结果,而简单的 MsgBox 则不能。

比如有这样一个工作表:

在工作表上放置一个命令按钮并添加以下代码行:

1. 首先,我们声明一个名为 answer 的 Integer 类型变量。

Dim answer As Integer

2. 我们使用MsgBox 函数根据用户的输入来初始化变量 answer 。

当使用括号时,MsgBox 函数具有三个参数。第一部分用于消息框中的消息。使用第二部分指定要在消息框中显示的按钮和图标。第三部分显示在消息框的标题栏中。

answer = MsgBox("您确定要清空工作表吗?", vbYesNo + vbQuestion, "清空工作表")

注意:将光标放在 Visual Basic 编辑器中的 vbYesNo 上,然后单击 F1 查看可以使用哪些其他按钮和图标。除了常量 vbYesNo 和 vbQuestion,您还可以使用相应的值 4 和 32。

3. 如果用户单击“是(Yes)”按钮,Excel VBA 将清空工作表。如果用户单击“否(No)”按钮,则不会发生任何事情。添加以下代码行来实现此目的。

If answer = vbYes Then Cells.ClearContents Else 'do nothing End If

4. 单击工作表上的命令按钮。

5. 单击“是(Yes)”。

结果:



【本文地址】

公司简介

联系我们

今日新闻

    推荐新闻

    专题文章
      CopyRight 2018-2019 实验室设备网 版权所有