excel_vba_编程教程(完整版)-第17部分

按键盘上方向键 ← 或 → 可快速上下翻页，按键盘上的 Enter 键可回到本书目录页，按键盘上方向键 ↑ 可回到本页顶部！
————未阅读完？加入书签已便下次继续阅读！


　　　　　清除了内置菜单或菜单选项，可以打开自定义菜单对话框，点击工具页，然后选择“重置”　
　　　　　按钮就可以恢复了。然而，这样操作后，会恢复Excel默认设置，你的自定义菜单选项也不复　
　　　　　存在了。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　29　

…　页面　46…

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－11　创建自定义菜单（第三步）你可以使用快捷菜单给菜单选择重命名，已经设置你自己的宏。　
你必须先打开自定义菜单，才能使用该快捷菜单　　

17　通过工具栏按钮运行宏　　

如果你喜欢使用工具栏里的按钮，你可以轻易地在任何工具栏里添加按钮，并且指定你自己的宏。　
我们来添加WhatsInACell到工具栏去。　　
1．　　选择“工具”－“自定义”　　
2．　　在自定义对话框，点击“命令”页　　
3．　　在类别清单里选择宏　　
4．　　拖曳“自定义按钮”图标到工具栏的任何地方。在本例中，这个按钮放在标准工具条中格式　
　　　　　刷的右边。　　
5．　　修改按钮的工具提示：在按钮上单击右键，然后在出现的快捷菜单的名称选项中，编辑名称　
　　　　　文本。本例中，将工具提示改为“Contents　of　Ce&lls”　　
6．　　修改按钮图标：在按钮上单击右键，并且选择“修改按钮图标”，出现42个Excel预先设计的　
　　　　　图标供你选择。本例中，用铅笔图标取代了默认的图标　　
7．　　给按钮指定宏：在按钮上单击右键，并且选择“指定宏”　　
8．　　选择“WhatsInACell”点击确定　　
9．　　点击关闭，关闭自定义对话框　　
10．　光标指向你刚才创建的自定义按钮上，按钮的旁边显示工具提示“Contents　of　Cells”（参　
　　　　　见图1－12）。点击按钮运行宏　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　30　

…　页面　47…

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－12　你可以在任何工具栏添加自定义按钮来运行宏　　

18　通过工作表里面的按钮运行宏　　

在本书后面，你将学习如何在工作表中添加按钮，帮助Excel初学者做数据输入。现在，我们来过　
一遍如何将宏WhatsInACell指定在一个工作表的按钮上。　　
1．　　激活含有数据的工作表　　
2．　　选择“视图”－“工具栏”，并且选择“窗体”。窗体工具栏出现了，如图1－13　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－13　你可以将宏指定给一个工作表里的按钮　　
3．　　在窗体工具栏上点击按钮　　
4．　　在工作表任意地方点击一下　　
5．　　当出现指定宏对话框时，选择宏名（WhatsInACell）然后点击确定　　
6．　　改变按钮1的名称：确保选中了按钮，并且输入名称“Contents　of　Cells”。按钮被选中后，　
　　　　　它就像图1－13里显示的一样。如果选择的符号没有显示，在按钮上单击右键，并且在快捷菜　
　　　　　单上选择“编辑文本”，选择默认的文字，然后输入新的名称　　
7．　　按钮重命名后，在工作表按钮之外的任何地方点击一下退出按钮编辑状态　　
8．　　点击你刚才创建的按钮，运行宏　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　31　

…　页面　48…

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－14　控件工具箱的默认工具　　
技巧1－9　往工作表里添加控件　　
你可以使用窗体工具栏往工作表里添加控件（参见图1－13），也可以使用控件工具箱（参见图1－　
14）。两种工具栏都可以通过视图选择工具栏选项来获得。　　
窗体里的控件和Excel的早期版本（5。0，7。0和97）兼容，并且可以用在图表，老的XLM宏表和所有　
你想通过点击控件来运行宏的工作表里。　　
控件工具箱里的控件就是人们熟知的ActiveX控件。你可以将ActiveX控件放在工作表或者你用VB　
编辑器创建的窗体上。然而，窗体工具栏上的控件只对点击（Click）事件反应，ActiveX控件则有　
许多行为，或者说事件，发生于你使用它的时候。　　
当你使用窗体控件时，你给它指定宏。这个宏时储存在本工作表，新工作表或者个人宏工作簿的一　
个模块里。当你使用ActiveX控件时，书写的宏代码时储存在控件本身的。　　

19　保存宏　　

在这章中，你创建的宏WhatsInACell位于一个Excel工作表中。你需要保存这个开启了的工作表来　
保存这个宏。我建议你将其保存为Chap01。xls。保存后，关闭它，然后打开一个新工作表。注意，　
你工具栏上的自定义按钮还在那儿，正如工具菜单里的Contents　of　Cells样还在那儿一。在你使　
用这些工具运行宏之前，请在单元格A1里输入“Addition”，A2里输入数字2，A3里输入数字4，已　
经A4里输入“=SUM（A2：A3）”。当你运行这个宏时，Excel会打开适当的工作表并且执行这个指定给　
自定义工具的过程。　　

20　打印宏　　

如果你要将你的宏归档起来，或者在你离开电脑的时候研究宏代码，你就需要打印宏。你可以打印　
你储存宏的整个模块，也可以打印选择的行。　　
打印含有宏的整个模块：　　
1．　　将光标放在模块的任意地方　　
2．　　选择“文件”－“打印”　　
3．　　在打印－VBA对话框，选择“当前模块”　　
4．　　点击确定打印模块　　
打印选中的文本：　　
1．　　在模块里，选择你要打印的文本　　
2．　　选择“文件”－“打印”　　
3．　　在打印－VBA对话框，选择“选择”　　
4．　　点击确定打印选中的文本　　

21　保存宏在个人宏工作簿　　

当你录制宏时，可以将它保存在个人宏工作簿里面。当你储存宏在个人宏工作簿里时，Excel创建　
一个名为“Personal。xls”的文件并且放在“Program　FilesMicrosoft　OfficeOffice”的子文　
件夹——XLStart文件夹里。保存在XLStart文件夹的文件每次在Excel启动的时候都会自动打开。　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　32　

…　页面　49…

个人宏工作簿是一个保存通用宏代码的方便的地方，就像下面这个宏。现在来录制一个通用的宏　
　“FormulasOnOff”。这个宏的目的是设置是否显示工作簿的公式。　　
1．　　选择“工具”－“宏”－“录制新宏”　　
2．　　在录制宏对话框，输入宏名“FormulasOnOff”　　
3．　　在保存宏的下拉菜单里选择“个人宏工作簿”　　
4．　　点击快捷键文本框，并且按下“Shift＋F”　　
5．　　选择确定退出录制宏对话框　　
6．　　按下“Ctrl＋~”打开公式的显示，或者选择“工具”－“选项”并且点击“视图”页上“窗　
　　　　　口选项”中的“公式”检验盒。当你打开公式显示时，工作簿单元格里显示的是公式，而非　
　　　　　这个公式计算出来的数值。如果你是在一个空白工作表中录制这个宏的，那么你将注意到的　
　　　　　唯一变化是工作表的列宽。　　
7．　　点击“停止录制”，或者选择“工具”－“宏”－“停止录制”　　
8．　　查看代码：按下Alt＋F11，或者选择“工具”－“宏”－“VB编辑器”　　
这时，VB编辑器屏幕上的工程窗口里显示了一个多出来的VBA工程（Personal。xls）。点击这个过程　
名左边的加号来打开这个工程。这个VBA工程包含两个文件夹：Excel对象和模块。点击模块文件夹　
的加号来打开它，然后双击模块1。这时代码窗口显示了宏FormulasOnOff的内容（参见图1－15）。　
每个Excel工作表只有一个工程。你第一次录制宏的时候，Excel创建一个模块文件夹，并且将你的　
代码储存在模块1里面。如果你在相同的工作表里录制另一个宏，Excel将其放在前一个录制的宏的　
同一个模块1的下面。相同工作时间录制的所有的宏都储存在相同的模块里面。但是，如果你关闭　
Excel，然后再重新这个工作簿，Excel就会将它储存在一个新的模块。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－15　在工程浏览器窗口，你可以选择你需要的工程　　
录制宏的时候，你打开了公式的显示。这个宏的名称表明可以切换公式显示的开和关。你必须修改　
代码才能确保它按照这种方式运行。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　33　

…　页面　50…

录制的宏设置当前窗口显示公式为真：　　
ActiveWindow。DisplayFormulas　=　True　　
设置为“False”将关闭公式的显示：　　
ActiveWindow。DisplayFormulas　=　False　　
为了在VBA里设置转换，你需要按照下面的方法来连接两语句：　　
ActiveWindow。DisplayFormulas　=　Not　ActiveWindow。DisplayFormulas　　
用上面的语句代替你录制的代码，并且运行这个宏。无论你运行多少次，这个宏总是知道做什么。　
你可以使用相同的思路来创建代码以切换格式线或其它Excel特点的显示与否。当你关闭Excel时，　
它会提示你保存个人宏工作簿的变化，点击确定以保存变化。当你重启Excel，个人宏工作簿会在　
后台自动开启。　　
如果你想要在个人宏工作簿里保存其它的宏，你可以选择下列方法中的一个：　　
　　　　簿。将宏粘贴到已经存在的模块中，或者创建一个新模块再粘贴　　

22　打开含有宏的工作簿　　

无论何时你打开一个含有宏的工作簿，Excel显示一个警告信息，如图1－16。为了避免显示这个警　
告信息，你可以通过安全对话框关闭病毒保护（参见图1－17）。　　
当病毒信息出现时，你可以选择：　　
　　　　的电脑不被宏病毒破坏，你应该选择“取消宏”。工作簿打开时不会运行它里面的任何宏。如果　
　　　　没有密码保护的话，你就可以切换到VB编辑窗口查看代码。查看代码后（译者：如果代码安全），　
　　　　你可以关闭该工作簿，然后重新打开它并且启用宏。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图1－16　如果你打开了病毒保护，当工作簿含有宏时，Excel　会弹出一个警告信息　　
　　　　Excel　2002　有一个有用的功能让你自动取消所有没有签名并且来源不明的宏。选择“工具”－　
　　　　“宏”－“安全”进入这个功能。　　
当你创建一个需要给别人使用的宏时，你可以使用VB编辑器工具菜单里的数字签名来确认这个宏不　
会带来病毒。宏的数字签名正如在纸上的签名。请在Excel在线帮助里搜索如何安装和创建你自己　
的数字签名。输入“数字签名”就可以获得相关主题。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　34　

…　页面　51…

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图－17　选择中间的选项，让你根据工作簿决定是否取消或者启用宏　　

23VB　编辑窗口　　

现在，你已经知道如何录制，运行和修改宏了，让我们花些时间来熟悉VB编辑器的一些特点。使用　
VB编辑器上的工具，你能够：　　
有两种方法进入VB编辑器：　　

24　了解工程浏览窗口　　

工程窗口显示当前打开的工程和它的组成部分清单。VBA工程包括下列组成：　　
通过工程浏览器，你可以管理你的工程，容易地在当前打开的工程中切换。　　
你可以通过三种途径激活工程浏览器：　　
工程浏览器有三个按钮。左边第一个按钮（查看代码）显示当前选中的模块（译者：或者窗体）里　
的代码窗口。中间那个按钮（查看对象）显示Excel界面当前工作表，或者窗体文件夹里面的窗体。　
右边的按钮（切换文件夹）隐藏或者显示工程浏览器里的文件夹。　　

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　35　

…　页面　52…

　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　　
图－18　标准工具栏上的按钮提供了快速的方式进入许多VB特征　　

25　了解属性窗口　　

属性窗口让你查看你工程里的对象和设置它们的属性。当前选中的对象的名称就显示在属性窗口的　
标题栏下面的对象栏。对象的属性可以按照字母顺序查看，也可以按类别查看（参见图1－19）。