vba依次给单元格添加超链接（ExcelVBA去除超链接）

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

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

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

Sub r()

ActiveSheet.Hyperlinks.Delete

End Sub

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

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