Dennis有一个小宏,可以很好地删除文档中的超链接。他刚刚收到一个新的文档,并且在脚注中有很多超链接。宏不会删除这些超链接,而手动删除它们是一件很麻烦的事情。丹尼斯想知道是否有一种方法可以一次删除脚注中的超链接。

实际上,有一种方法。如果需要,可以按照以下步骤手动进行:

。将插入指针放在脚注的主体内。 (哪个脚注都没有关系。)

。按Ctrl + A。这将选择所有脚注。 (如果选择了文档中的所有文本,则表示您没有执行步骤1。)

。按Ctrl + Shift + F9。这会将所选文本(脚注)中的超链接转换为普通文本。

您应该注意,这些步骤实际上将所选文本中的所有字段转换为普通文本。由于超链接是通过使用字段来实现的,因此将对其进行转换。但是,您脚注中可能包含的所有其他字段也是如此。如果您不想更改其他字段,或者需要大量处理脚注中的超链接,则可以改用宏。

以下宏将仅在脚注中消除超链接:

Sub RemoveFNH()

Dim h As Hyperlink

With ActiveDocument         If .Footnotes.Count >= 1 Then             With .StoryRanges(wdFootnotesStory)

For Each h In .Hyperlinks                     h.Delete                 Next h             End With         End If     End With End Sub

请注意,宏的重要部分是使用wdFootnotesStory故事范围的规范。 Word文档可以包含多个故事范围,每个故事范围代表一个不同的元素,例如页眉,页脚,脚注等。如果要从文档的所有部分(这意味着从所有故事范围)中删除超链接,则您可以使用更短的宏:

Sub RemoveAllHyperlinks()

Dim r As Range     Dim h As Hyperlink

For Each r In ActiveDocument.StoryRanges         For Each h In rng.Hyperlinks             h.Delete         Next h     Next r End Sub

宏将逐步浏览文档中的每个故事范围,如果该故事范围中有超链接,则将其删除。

注意:

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

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

(Microsoft Word是世界上最流行的文字处理软件。)本技巧(4636)适用于Microsoft Word 2007、2010、2013和2016。