[求助]如何快速取消大量的超链接

阿丰

WORD文档中有大量的超链接，多达上百个，如何快速取消？一个个选择取消太烦了。

红过刘德华

提供最快，不用编程的方法。

直接将含有连接的代码，拷贝进记事本，在拷贝进入word或者excel，超连接格式自然消除。

红过刘德华

提供最快，不用编程的方法。

直接将含有连接的代码，拷贝进记事本，在拷贝进入word或者excel，超连接格式自然消除。

yewen

给你个小宏，只取消word 中的http链结！



Sub 取消网页链结()
x = ActiveDocument.Fields.count
Y = 0
If x >= 1 Then
    For i = x To 1 Step -1

        If InStr(1, ActiveDocument.Fields(i).Code, "http") > 0 Or InStr(1, ActiveDocument.Fields(i).Code, "mailto:") > 0 Then
            ActiveDocument.Fields(i).Select
            ActiveDocument.Fields(i).Unlink
            Y = Y + 1
        End If

    Next
End If
MsgBox "当前文档共有" + Str(x) + " 处链结，取消了" + Str(Y) + "处网页链结！"
End Sub

沙

还有一方法，“编辑”“全选”在“格式窗格”里选择“清除格式”命令。

jialiang

TKS!

红池坝

Word：全选－复制－选择性粘贴－粘贴文本Excel：同上，选择性粘贴－数值

jialiang

对，EXCELL里也有类似的情况，不知道怎么办？