Excel VBA:开发和使用 "是 "与 "否 "消息框

  • Share This
Hugh West

在这篇文章中,我将向你展示你如何开发和使用一个 是 否 中的消息框。 VBA 在Excel中。

用Excel VBA开发和使用 "是 "或 "否 "消息框(快速浏览)

 Sub Yes_No_Message_Box() Answer = MsgBox("Do You Like ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If 结束 Sub 

下载实践工作手册

下载这本练习手册,在阅读本文时进行练习。

是 否 信息框.xlsm

开发和使用是与否消息框的VBA代码概述(分步分析)

让我们学习一下使用 是-否信息框 用一个简单的例子来说明。 信息框 会问你一个问题,你喜欢ExcelWIKI吗?

如果你的答案是肯定的,你将点击 信息框 而如果你的答案是 没有 ,你将点击 没有 .

现在,在你点击 "是 "或 "否 "之后会发生什么? 信息框 在活动的工作表中,有 2 含有喜欢和不喜欢ExcelWIKI的人数的单元格。 如果你点击了 ,类似单元格中的数字将增加1。

而如果你打 ,不喜欢的单元格中的数字将增加1。

那么,如何用一种方法来完成这整个任务呢? VBA 简单,有 2 整个过程中的主要步骤。

  • 发展 是------没有信息框
  • 使用 "中国 "的输出。 信息箱

我正在展示每个步骤的细节,供你学习。

⧪ 第1步:开发 "是-否 "信息框

首先,你必须创建 是-否信息 盒中 VBA 这很简单,使用与普通消息框相同的程序,对参数提出问题,并加上一个新的参数 vbYesNo .

这里的问题是。 "你喜欢ExcelWIKI吗?"

 Answer = MsgBox("Do You Like ExcelWIKI?", vbYesNo) 

⧪ 步骤2:使用消息框输出

下一步,我们将完成一项任务,使用 信息框 这里,细胞 C3 包含喜欢ExcelWIKI的人数,而单元格 C4 包含不喜欢ExcelWIKI的人的数量。

因此,如果答案是 , 细胞 C3 将增加1。 而如果是 没有 , 细胞 C4 将增加1。

我们将使用一个 如果-块 来执行这个。

 如果答案 = vbYes 那么Range("C3") = Range("C3") + 1 如果答案 = vbNo 那么Range("C4") = Range("C4") + 1 End If 

因此,完整的 VBA 代码将是。

VBA代码。

 Sub Yes_No_Message_Box() Answer = MsgBox("Do You Like ExcelWIKI?", vbYesNo) If Answer = vbYes Then Range("C3") = Range("C3") + 1 ElseIf Answer = vbNo Then Range("C4") = Range("C4") + 1 End If 结束 Sub 

在Excel中创建开发和使用是与否消息框的宏程序

我们已经看到了开发和使用Yes-No消息框的代码的逐步分析。 现在,让我们看看如何建立一个Macro来运行该代码。

⧪ 第一步:打开VBA窗口

新闻 ALT + F11 在你的键盘上按下鼠标,打开 视觉基础 窗口。

⧪ 步骤2:插入一个新模块

转到 插入> 模块 在工具条上点击 模块 一个新的模块名为 模块1 (或任何其他东西,取决于你过去的历史)将打开。

⧪ 第三步:放入VBA代码

这是最重要的一步。 插入给定的 VBA 模块中的代码。

⧪ 第四步:运行代码

点击进入 运行子程序/用户表格 工具从上面的工具条上。

该代码将运行。 A 信息框 会问你是否喜欢 ǞǞǞ 或不,有一个 和一个 没有 选择。

如果你选择 ,单元格中的数字 C3 将增加1。 如果你选择 没有 ,单元格中的数字 C4 将增加1。

在这里,我选择了 ,所以喜欢的人的数量 ǞǞǞ 已经增加了一个。

需要记住的事情

  • A 信息框 VBA 共包含 4 参数称为 提示,按钮,标题 ,以及 帮助文件 这里我只显示了 2 参数。 提示 钮扣 但如果你想发现 VBA消息框 更详细的信息,你可以查看这个链接。

Hugh West is a highly experienced Excel trainer and analyst with over 10 years of experience in the industry. He holds a Bachelor's degree in Accounting and Finance and a Master's degree in Business Administration. Hugh has a passion for teaching and has developed a unique teaching approach that is easy to follow and understand. His expert knowledge of Excel has helped thousands of students and professionals worldwide improve their skills and excel in their careers. Through his blog, Hugh shares his knowledge with the world, offering free Excel tutorials and online training to help individuals and businesses reach their full potential.