如果您在训练环境中或在许多人使用的一组计算机上使用Word,则可能需要一种方法来确保工具栏始终返回其默认状态。例如,如果一个用户重新布置了工具栏,则可能希望它们在下一个用户启动程序之前返回其默认状态。

有两种方法可以处理这种情况。也许最简单的方法是简单地将Normal.dot模板文件设置为只读。由于工具栏设置存储在模板中,因此这将有助于许多工具栏。但是,如果使用其他模板,则使用这些模板时可能会更改工具栏。另外,如果您要允许对模板进行其他更改,则此方法将无效。

另一种解决方案是创建一个宏,将您的工具栏重置为其默认状态。这是一个相当简单的宏。 (如果正在培训如何使用Word编程的人员,您甚至可能希望使该宏成为类分配的主题。)以下宏可以存储在模板中,并且由于每次打开文档时都会运行该宏,它将把您的工具栏重置为默认状态:

Sub AutoOpen For Each cb In CommandBars     cb.Reset Next End Sub

如果您需要更好地控制工具栏,包括重置它们的放置位置,则可以使用如下宏:

Private Sub Document_New()

CommandBars("Formatting").Protection = msoBarNoCustomize + \        msoBarNoChangeVisible + msoBarNoMove End Sub

该宏应放在Normal.dot的ThisDocument模块中。

这个特定的示例仅保护“格式设置”工具栏,但您可以快速将其调整为要保护的其他工具栏。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_WordTips_是您进行经济有效的Microsoft Word培训的来源。

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(1335)适用于Microsoft Word 97、2000、2002和2003。