如何在MS Office中添加VBA？

我看过一些帖子，这些帖子显示了使用VBA（应用程序的Visual Basic）代码/宏的答案，但是，之后我也注意到了有关如何使用VBA（如何实现和执行）的其他注释。我希望这将有助于执行代码。

所以，我的问题是：

我有一些VBA代码。如何将VBA添加到MS Excel或Word或Outlook项目？

要在任何Microsoft Office产品^1中打开VBA编辑器，请按Alt+ F11。

接下来，您需要确定如何实现VBA。您是否要通过软件中的某些事件来触发它，例如正在保存文件或更改电子表格中的选择？还是您希望自己能够随时执行代码？

如果是前者，请查看“项目资源管理器”，找到与当前正在处理的文件关联的项目。

如果您希望代码被与特定工作表关联的事件触发（例如，每次在Sheet1上的值更改时代码都应运行），则应双击“项目资源管理器”中列出的特定工作表对象。这将打开一个文本框，您可以在其中粘贴代码。如果事件与整个工作簿而不是特定工作表关联（例如，代码应在保存工作簿时运行），请ThisWorkbook在“项目资源管理器”中双击该对象。

但是，如果您不希望代码被事件触发，则需要将代码放置在模块中。如果文档或工作簿中还有其他代码，例如来自记录的宏，则它将出现在模块中。如果存在现有模块，则在大多数情况下，您将需要将代码粘贴到任何现有代码下方的同一模块中。现有模块将在“项目资源管理器”中列出。

如果不存在任何模块，则需要插入一个新模块。为此，请Module从InsertVBA编辑器窗口的下拉菜单中选择。这将插入一个新模块，并在编辑器窗口中显示一个文本窗口。将您的代码粘贴到此处。

如果要在模块中执行代码，则有几种选择。一种是从VBA编辑器窗口中运行代码。您可以将光标简单地放在要运行的代码中，然后按F5，或单击菜单栏下方工具栏中的（运行）按钮以执行代码。

另一个选项是使用Macros对话框。要打开它，请执行以下任一操作：

• 在功能区的View选项卡上，在Macros窗格（最右侧）中，单击Macros按钮
• 在Developer选项卡上的Code窗格（最左侧）中，单击Macros按钮
• 按Alt+F8

该对话框如下所示：

在上面的例子中，你可以运行YourCode通过

• 从列表中选择它，然后单击Run，或
• 从列表中选择它，然后双击它。

______
¹根据可以在Excel 2010简化版中使用VBA吗？，则不能在Excel 2010 Starter Edition中使用VBA。

这些步骤是使用Office 2010（除非另有说明）完成的，但对于2007和2013也应足够相似。我正在用Excel进行操作，但差异应该很小。

第一步是将“开发人员”选项卡添加到功能区。

在Office 2007中，

1. 单击“ Office菜单”->“ （程序）选项”。（“ Office菜单”指的是左上角的按钮。）这将弹出一个菜单，该菜单的底部具有“ Excel选项”，“ Word选项”等按钮。

2. 在选项对话框中，选中“在功能区中显示开发人员选项卡”： 然后单击“确定”。

3. 应该会显示新的“开发人员”标签。

在Office 2010和2013中，

1. 单击文件 -> 选项。

2. 选择自定义功能区。

3. 在右侧，找到“ 开发人员”并选中该框。单击确定。

4. 您的新标签应该显示出来，单击它，然后单击Visual Basic。

显示了一个令人生畏的屏幕，这是VBA代码编辑窗口。

旁注：您也可以使用Alt+ F11键盘快捷键打开VBA代码编辑窗口（即使未显示“开发人员”标签）。

在代码编辑窗口中，左侧应该有一个名为Project-VBAProject的窗格。在这种情况下，Microsoft Excel对象（此名称根据所使用的程序（Word，Outlook等）的不同而不同）是称为ThisWorkbook的“事物”。双击此工作簿

在此示例中，我们将使用以下代码。

sub WarnMeOfDanger()
   MsgBox "Argh, a dragon is behind you!"
end sub 

上面所做的只是显示打开一个对话框以在屏幕上显示一条消息。

复制代码，然后将其粘贴到VBA代码编辑窗口的白板中。

现在，在VBA代码编辑器窗口的顶部，单击绿色的播放按钮，您应该会看到一条消息。

因此，每次您要运行代码时，请返回此屏幕并按播放！

但是，您可能希望添加自己的按钮。如果要添加按钮，请首先注意代码的第一行是WarnMeOfDanger()。这实际上是我们的“ 子例程 ” 的名称。我们稍后会记住这一点。现在，只需关闭您一直在使用的窗口（代码将自动保存）。

仍然在Developer功能区中，单击Insert，然后选择第一项，即按钮。您的鼠标光标会变成一个小十字（不生气，是指它的外观）。绘制按钮的大小。出现一个新窗口，它应该向我们显示将按钮分配给功能的选项。在这种情况下，我们应该看到类似的内容ThisWorkbook.WarnMeOfDanger。单击此，然后单击确定。

现在，如果您按新按钮，将显示该消息。右键单击按钮以获取移动，更改文本，调整大小等选项。