1.打开需要处理的Excel表格2.Alt+F11打开VB编辑器3.双击左边的“Sheet1”或相应的表名4.在右边编辑框输入下面的代码,注意相应文件名修改oldfile和newfile,其中原来超链接路径写在“旧文件路径”,新的超链接路径写在“新文件路径”。DimoldfileAsStringDimNewfileAsStringSubRemoveHyperLinks()oldfile=旧文件路径'需要替换的旧文件名Newfile=新文件路径'替换成的新文件名ForEachhlinkInCells.Hyperlinkshlink.Address=Replace(hlink.Address,oldfile,Newfile)NextEndSub5.关闭VB编辑器,回到Excel主界面6.Alt+F8调出宏对话框7.选择“RemoveHyperLinks”然后点击“运行”按钮