如果excel中的单元格带有超链接，即可通过点击单元格快速的地位到网址。

但是如果超链接多了，逐个去删除会相当繁琐。

这里通过函数批量删除所有单元格的超链接。

Sub Remove_Hyperlinks()     Cells.Hyperlinks.Delete End Sub

源文件

将光标定位到代码语句中，单击绿色的右值箭头“运行子过程/用户窗体”按钮，运行程序后结果