您是否通过粘贴从Internet复制的信息来创建工作表?对于某些人而言,这并不罕见,因为可以从Internet复制很多公共领域的信息。当您将信息粘贴到工作表中时,您可能会注意到有很多超链接。如果您想摆脱那些超链接怎么办?同样,您可能会从某人那里继承工作表,并且该工作表包含许多要删除的超链接。

最简单的方法是运行一个删除所有超链接的宏。

以下宏可快速删除工作表中的所有超链接,而不会影响它可能包含的其他任何内容:

Sub KillLinks()

Do Until ActiveSheet.Hyperlinks.Count = 0         ActiveSheet.Hyperlinks(1).Delete     Loop End Sub

注意:

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

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(3249)适用于Microsoft Excel 97、2000、2002和2003。