论坛风格切换
正版合作和侵权请联系 sd173@foxmail.com
 
  • 帖子
  • 日志
  • 用户
  • 版块
  • 群组
帖子
购买邀请后未收到邀请联系sdbeta@qq.com
  • 1184阅读
  • 1回复

[求助-系统问题]Excel 2007中批量删除超链接的两种方法 [复制链接]

上一主题 下一主题
离线quen2008
 
发帖
*
今日发帖
最后登录
1970-01-01
只看楼主 倒序阅读 使用道具 楼主  发表于: 2009-07-11 13:11:33
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

二、选择性粘贴法

右击含有超链接的列并选择“复制”,接着在该列(左)右边插入一空白列,然后右击该空白列,选择“选择性粘贴”(图4),

在随后出现的“选择性粘贴”窗口中,点选“数值”选项(细心的人会发现,当选择“数值”等选项时,“粘贴链接”按钮就变成灰色不可用状态,图5,自然也就不会进行超链接的粘贴),最后保留该列,再删除原先含有超链接的列即可。
[ 此帖被quen2008在2009-07-11 13:27重新编辑 ]
离线寒江雪
发帖
*
今日发帖
最后登录
1970-01-01
只看该作者 沙发  发表于: 2009-07-11 16:17:35
我一般用选择性粘贴法