小伙们应该都遇到过此类情况,从网页上粘贴下来的文字好多都带有超链接,我们平常的做法都是右键单击,选中取消超链接的选项。这种方法只适用于单个或者是超链接比较少的情况,那么如果复制过来的文本有很多超链接,那岂不是要累死了。那么今天小编就带大家采用强大的VBA来实现去除超链接,快到没朋友。

vba依次给单元格添加超链接(ExcelVBA去除超链接)(1)

以上是我们要批量去除的超链接,然后ALT F11打开VBA代码窗口。

vba依次给单元格添加超链接(ExcelVBA去除超链接)(2)

然后点击sheet1调出代码窗口,然后把下边的代码粘贴上去。

Sub r()

ActiveSheet.Hyperlinks.Delete

End Sub

代码的意思就是删除活动表中的超链接。

然后保存关闭代码窗口,点击宏选项,执行sheet1.r,瞬间所有表中的超链接都去除了,简简单单的三行代码快速搞定了超链接,当然了,在word中也同样适用,小伙伴们也去试试吧。

,