《VBA之Excel应用》（版权10178983）是非常经典的，是我推出的第七套教程，定位于初级，目前是第一版修订。这套教程从简单的录制宏开始讲解，一直到窗体的搭建，内容丰富，实例众多。大家可以非常容易的掌握相关的知识，这套教程共三册，十七章，都是我们在利用EXCEL工作过程中需要掌握的知识点，希望大家能掌握利用。今日讲解的内容是:VBA之Excel应用第二章第第一节：MsgBox对话框对信息的提示

【分享成果，随喜正能量】沉潜是为了蓄势待发，沉潜是为了等待因缘。鲸豚沉潜于大海，幽兰深藏于山谷，能够经得起沉潜的人，才会有更高的成就。正如一年的树木只能当柴烧，十年的树木可以制成椅凳橱柜，百年的树木才能成为栋梁。。

第二章 MsgBox与InputBox对话框的应用

大家好，我们今日开始第二章的学习，在第一章中我们初步认识了VBA代码，知道了VBA代码写在哪里，如何运行VBA代码，以及如何录制宏，如何保护我们的代码，这些都是最基本的知识，我们要好好掌握。这章的内容我们要讲解一个对话框的应用，就是MsgBox。这个对话框是非常重要的，可以说在VBA代码应用中随处可见。我们要理解这个对话框的应用，并应用到我们自己的代码中。

第一节 MsgBox对话框2 MsgBox对话框对信息的提示

MsgBox对话框还可以对更高级的信息进行提示，例如，当我们在单元格A1中输入信息后，可以用这个对话框来展示给用户。如下面的代码：

Sub mynzA()

MsgBox "在A1单元格中录入的内容为: " & Range("a1").Value

End Sub

代码截图：

代码解读：

MsgBox "在A1单元格中录入的内容为: " & Range("a1").Value 这句代码会弹出一个窗体对话框，这个窗体对话框中会提示工作表A1单元格中的内容。Range("a1").Value指的是单元格A1的值。

我们使用了“&”运算符来连接两个字符串，Range（“A1”）.value的结果是看作字符串来对应的。

下面我们仍旧是看一下代码的运行结果。

在工作表上建立一个按钮，将上述“mynzA”过程关联上建立的按钮，点击运行，看运行的结果：

3 MsgBox对话框中换行的实现

有时，需要提示的信息会很长，我们需要利用换行符来实现。如下面的代码：

Sub mynzB()

MsgBox "在A1单元格中录入的内容为: " & vbNewLine & Range("a1").Value

End Sub

代码截图：

代码解读：vbNewLine 是指的换行。当字符串遇到这个符号后会在新的一行开始。

我们看代码运行的结果：

这个时候，提示的信息是用两行来实现的。

今日内容回向：

1） MsgBox如何利用？

2） MsgBox对话框如何实现提示信息？

3) MsgBox对话框如何实现提示信息的换行？

我20多年的VBA成果全在下面的资料中：