1. 打开需要处理的Excel表格
2. Alt + F11打开VB 编辑器张子枫诡异的笑
3. 双击左边的 “Sheet1”或相应的表名
4. 在右边编辑框输入面的代码,注意相应文件名修改 oldfile 和  newfile,其中原来超链接路径写在“旧文件路径”,新的超链接路径写在“新文件路径”。
Dim oldfile As String
Dim Newfile As String
Sub RemoveHyperLinks()3.35dk天赋
oldfile = "旧文件路径"      '需要替换的旧文件名水管知识
Newfile = "新文件路径" '替换成的新文件名
国民校花
    For Each hlink In Cells.Hyperlinks
        hlink.Address = Replace(hlink.Address, oldfile, Newfile)
    Next
End Sub
5. 关闭VB 编辑器,回到Excel主界面
演员胡亚捷6. Alt + F8调出宏对话框
7. 选择“RemoveHyperLinks”然后点击“运行”按钮
>汤芳大胆人体艺术