一、VBA简介——添加宏快捷按钮

点击开始——选项——快速访问工具栏——从下列位置选择命令（宏）——选择需要添加的”宏“——添加——确定。

鼠标左键点击快速访问工具栏的快捷键即可执行相应的宏命令。

1）点击：开发工具——控制——插入——表单控制（按钮（窗体控制键））

2）在表格中适当位置拖动，绘制快捷按钮；

3）选取按钮对应的宏，点击确定；

4）左键单击快捷按钮，修改快捷按钮名称；

5）单击宏，运行宏命令。

1. 任意打开一篇文挡，用鼠标任选一段文字。

2. 执行“工具→宏→录制新宏”命令，打开如图1所示对话框。

3. 在“录制宏”对话框的“宏名”文本框中输入宏的名称“读前设置”，在“将宏保存在”下拉列表框中选择“所有文档（normal.dot）”，然后单击〔工具栏〕按钮，打开图2所示“自定义”对话框。

4. 在“自定义”对话框中选择“命令”选项卡，在“命令”列表框中将显示输入的宏名。在该名称上按下鼠标左键将其拖到“常用”工具栏上，这样工具栏上就多了一个〔读前设置〕按钮了。

图1录制新宏

5. 单击〔关闭〕进入宏的录制过程。此时，“停止”浮动工具栏将出现在屏幕上，此工具栏上有两个按钮，左边是〔停止〕，右边是〔暂停〕（如图3）。

6. 执行“格式→字体”命令，在打开的“字体”对话框中选择“字体”选项卡，在对话框的“中文字体”下拉列表中选择“宋体”，在“字形”下拉列表中选择“常规”，在“字号”下拉列表中选择“小四”，在“字体颜色”下拉列表中选择“灰度-80%”，单击〔确定〕。

7. 执行“格式→背景→其他颜色”命令，在打开的“颜色”框中选择一种很浅的灰色，单击〔确定〕。

8. 单击“停止”工具栏上的〔停止〕按钮结束录制。

图2 “自定义”对话框

图3“停止”工具栏

这样，以后只要在网上阅读文字，在Word里打开，先用“Ctrl+A”全选后，单击“常用”工具栏上的宏按钮〔读前设置〕，就可以看到很舒服的文字效果了。

sub kkk()

dim i

for i = 1 to 10 '循环10次

call 宏1 '宏1 需要执行的 宏

next

end if

---