将Excel中的超级链接批量去掉

多年来, 我都有在网页复制数据, 贴在excel上使用, 但很多数据的文本都有超级链接, 有时达几仟个, 以致在编辑数据时, 非常不便, 甚至无法正常工作。

当然可单击右键, 去掉超级链接, 但每次只能去掉1个, 后来我自行编写以下的简单vba:

sub link_move()

set xxx = selection

for each xx in xxx

xx.hyperlinks.delete

next

end sub

只要将含有超级链接的单元格范围点选, 开动vba, 不需两秒钟, 便一次过去掉所有几千个超级链接。

我以前是用excel 97, 及 excel 2000, 现时是用excel 2003, 但复制, 选择性粘贴都是无法去掉超级链接的。

重新复制粘贴，粘贴时不要直接粘贴，要使用选择性粘贴，在跳出的对话框中将数值前的方框内打上勾，确定即可以取消超级链接。剩下的全部只是文本内容了，所在的超级链接就全部取消了。