将实时URL转换为普通文本(Microsoft Word)
Word本身就是一个连接良好的程序,具有自动将URL转换为超链接的功能。虽然您可以关闭该功能以使Word不会进行转换,但是您的文档可能已经包含链接字段。这样,否则您可能会从没有禁用该功能的其他人那里获取文件。在这些情况下,您可能正在寻找删除现有超链接的方法。有几种方法可以解决此问题。
删除超链接的第一种(也是最简单的方法)是将插入点放置在链接内的某个位置,然后按Ctrl + Shift + F9。这会将域代码转换回没有链接的常规文本。实际上,如果您不使用文档中除超链接以外的任何字段,则可以通过简单地选择整个文档(按Ctrl + A)然后按Ctrl + Shift + F9来删除每个超链接。但是,您应该意识到,如果文档中还有其他字段,此操作也会导致它们也转换为纯文本。
将超链接转换为常规文本的另一种简便方法是,右键单击要删除的超链接,然后从上下文菜单中选择“删除超链接”。如果您有很多文档需要删除超链接,或者您的文档中有很多超链接,那么即使是这种简单的技术在一段时间后也会变得乏味。在这种情况下,您可能需要创建一个宏来为您完成工作。下面的宏RemoveHyperLinks删除文档中的所有超链接,并确保关闭了用于创建超链接的自动套用格式功能:
Sub RemoveHyperlinks() While ActiveDocument.Hyperlinks.Count > 0 ActiveDocument.Hyperlinks(1).Delete Wend Application.Options.AutoFormatAsYouTypeReplaceHyperlinks = False End Sub
此宏不会损害文档中的任何其他字段。但是,您应该注意,它只会影响出现在文档主要部分内的超链接。如果您在其他区域(例如脚注或尾注)中有超链接,则不会被触及。
相反,您将需要一个宏,该宏专门查看那些元素使用的“故事”中的超链接。这是一个适用于脚注和尾注的宏,删除了它们可能包含的所有超链接:
Sub RemoveFNH() Dim h As Hyperlink Dim J As Integer With ActiveDocument If .Footnotes.Count >= 1 Then With .StoryRanges(wdFootnotesStory) For J = .Hyperlinks.Count To 1 Step -1 .Hyperlinks(J).Delete Next J End With End If If .Endnotes.Count >= 1 Then With .StoryRanges(wdEndnotesStory) For J = .Hyperlinks.Count To 1 Step -1 .Hyperlinks(J).Delete Next J End With End If End With End Sub
请注意,此宏采用的方法与早期的方法不同。
它不仅可以在脚注和尾注的正确故事中起作用,而且可以在“超链接”集合中向后移动,而不是不断删除“超链接”集合中的第一个超链接。
注意:
如果您想知道如何使用此页面(或_WordTips_网站上的任何其他页面)上描述的宏,我准备了一个包含有用信息的特殊页面。
_WordTips_是您进行经济有效的Microsoft Word培训的来源。
(Microsoft Word是世界上最流行的文字处理软件。)本技巧(8713)适用于Microsoft Word 2007、2010、2013、2016、2019和Office 365中的Word。 Word的旧菜单界面在这里: