内森(Nathan)想编辑一系列自动图文集条目时,连续显示“自动更正”对话框的“自动图文集”选项卡很麻烦。他想知道是否可以通过某种文件或其他方式对条目进行批量编辑。

自动图文集词条存储在模板中,大多数情况下存储在“普通”模板中。没有特殊文件可以直接加载和编辑。而是,您需要使用Word为此目的提供的工具。

如果您需要做的就是删除许多自动图文集条目,那么使该任务更容易的工具是管理器。请按照下列步骤操作:

。从工具菜单中选择模板和加载项。 Word将显示“模板和加载项”对话框。 (请参见图1。)

。单击管理器按钮。 Word将显示管理器工具。

。确保显示“自动图文集”选项卡。请注意,管理器的右侧应包含Normal.dot文件的信息。如果是这样,请跳到步骤7。如果不是,或者您的自动图文集词条与Normal.dot不在同一模板中,请继续下一步。 (请参见图2。)

。单击管理器右侧下方的“关闭文件”按钮。

这将关闭模板的信息。

。单击打开文件。 Word将显示一个标准的“打开”对话框。

。使用对话框中的控件导航到并打开包含自动图文集词条的模板。

。在管理器右侧的自动图文集条目列表中,单击要删除的第一个条目。

。在单击要删除的其他自动图文集条目时,请按住Ctrl键。

。选择了要删除的所有条目后,单击“删除”按钮。

。可能会询问您是否确定要删除条目;回答是。

。关闭管理器。

删除大量自动图文集词条的另一种方法是使用宏。下面的宏提供了一种简单的方法来逐步浏览每个自动图文集条目,并决定是否要删除它。

Sub DeleteAutoTextEntries()

Dim I As AutoTextEntry     Dim vAnswer As Variant

For Each I In NormalTemplate.AutoTextEntries         vAnswer = MsgBox("Delete AutoText Entry" & vbCr _           & "Name: " & I.Name & vbCr _           & "Value: " & I.Value, vbYesNoCancel, _           "Delete AutoText Entries")

Select Case vAnswer             Case vbYes                 I.Delete             Case vbCancel                 Exit Sub         End Select     Next I End Sub

该宏假定自动图文集词条位于Normal.dot模板中;如果您将它们放在其他模板中,则可以更改NormalTemplate引用,以便使用其他模板。该宏在对话框中显示每个自动图文集词条,您可以删除它或不删除它。您也可以单击“取消”按钮(或按Esc键),宏立即结束。

注意:

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

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

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