文章来源:电脑报
作者:
发布时间: (
2008-7-11
) 浏览次数:1355
Excel中某列单元格均含有超链接,用手工删除超链接的方法必须一个个进行:右击该列中任何一个含有超链接的单元格,选择“取消超链接”(图1)。由于数量巨大,因此只能考虑采用批量删除法。
一、宏代码去除法
打开该Excel文件,切换到“视图”选项卡,点击“宏”→“录制宏”,出现“录制新宏”窗口,在“宏名”定义一个名称为:RemoveHyperlinks(图2),点击“确定”退出;
再点击“宏”→“查看宏”,选择“宏名”下的“RemoveHyperlinks”并点击“编辑”,打开“Microsoft Visual Basic”编辑器,用如下内容替换右侧窗口中的所有代码(图3),然后保存关闭VBA编辑器:
Sub RemoveHyperlinks()
‘Remove all hyperlinks from the active sheet
ActiveSheet.Hyperlinks.Delete
End Sub
再点击“宏”→“查看宏”,选择“宏名”下的“RemoveHyperlinks”并点击“执行”即可去除该工作表的链接。
用以下代码也可以达到相同的目的:
Sub ZapHyperlinks()
Cells.Hyperlinks.Delete
End Sub
Excel中某列单元格均含有超链接,用手工删除超链接的方法必须一个个进行:右击该列中任何一个含有超链接的单元格,选择“取消超链接”(图1)。由于数量巨大,因此只能考虑采用批量删除法。
一、宏代码去除法
打开该Excel文件,切换到“视图”选项卡,点击“宏”→“录制宏”,出现“录制新宏”窗口,在“宏名”定义一个名称为:RemoveHyperlinks(图2),点击“确定”退出;
再点击“宏”→“查看宏”,选择“宏名”下的“RemoveHyperlinks”并点击“编辑”,打开“Microsoft Visual Basic”编辑器,用如下内容替换右侧窗口中的所有代码(图3),然后保存关闭VBA编辑器:
Sub RemoveHyperlinks()
‘Remove all hyperlinks from the active sheet
ActiveSheet.Hyperlinks.Delete
End Sub
再点击“宏”→“查看宏”,选择“宏名”下的“RemoveHyperlinks”并点击“执行”即可去除该工作表的链接。
用以下代码也可以达到相同的目的:
Sub ZapHyperlinks()
Cells.Hyperlinks.Delete
End Sub
信息维护部门:邹平县码头镇 责任编辑:王涛 联系方式:05434761015