■ 安平
相信很多读者对新版的WPS Office提供的多风格界面羡慕不已，通过菜单可以快速切换到用户当前工作所需要的工具栏、菜单布局和编辑器颜色等。然而，更常用的Word却没有提供这些功能。别急，本文将在Word XP中通过VBA轻松搞定多风格界面，而且还可以建立自己的工具栏和菜单哦。
Word多风格界面任务描述
这是一个包含代码的Word模板文件，通过“加载”方式可直接运行，运行后将在Word XP的主界面中新增菜单和工具栏，并提供了几套适合不同工作环境的界面布局，单击相应菜单即可实现不同风格界面布局的切换。
标准风格：显示主菜单栏以及常用、格式两个工具栏，并将文本编辑区设置为“蓝底白字”。
简单风格：仅显示主菜单栏和程序新建的工具栏，并将文本编辑区恢复为“白底黑字”，如图1所示。单击工具栏上的按钮，则会显示对话框。
绘图和制表风格：显示主菜单栏和常用、格式、绘图、图片、符号栏以及表格和边框工具栏等，并将文本编辑区恢复为“白底黑字”。
多风格界面的实现
1.录制宏
其实，对Word XP使用熟练的读者会发现，所谓“多风格界面”，其实即设置了不同工具栏，并在“选项”对话框的“常规”选项卡中设置了“蓝底白字”复选框。本刊2004年22期的《VBA进阶撑杆跳──Office VBA入门》一文中已经介绍了“宏”的基本使用。因此，可先通过录制“宏”来获取实现界面切换的相关代码。
2.解读宏代码
打开“宏”代码的编辑窗口，笔者摘录了一些与本程序密切相关的“宏”代码进行详细解读。
“CommandBars("Formatting").Visible = False”语句
顾名思义，“CommandBars”代表“工具栏”，而“Formatting”代表“格式”，“Visible”含义为“可视”，因此，该语句的含义为“格式”工具栏不可视（即不显示）。
“CommandBars("Standard").Visible = False”语句
和前述语句类似，即“常用”工具栏不可视。
“.BlueScreen = False”语句
该语句包含在
With Options
…
End With
代码块中，其中“With”代表“包含”，“Options”代表“选项”，而“BlueScreen”则代表“蓝屏”（即蓝底白字）。因此，该语句的含义为“选项”中不选择“蓝底白字”。
怎么样？解读宏代码不是一件很神秘的事吧。
你知道吗？
VBA编辑器提供了强大而完善的联机帮助，如有无法理解的代码，只要选择该关键字，然后按下F1键即可获取详尽的联机帮助，如图2所示。
|
