使用VB取消Word问题图片超链接

2019年4月14日#VB91

AI 生成的摘要

使用VB取消Word文档中图片的超链接的方法如下：打开Word，按Alt+F11，粘贴代码并运行。代码会遍历文档中的所有超链接并删除。完成后关闭页面即可。

0X001 前言#

昨天想把文章保存下来上传内部 WIKI，使用 ctrl+P 保存到本地，但是复制的时候还是调用超链接，无奈想起来 Word 文档，（不想去装什么插件，因为不安全）利用 Word 发现还存在，右键图片取消每次只能取消一个，觉得太麻烦。
无奈之下使用 VB 搞定超链接过程如下:

1. 打开 Word，在 word 文档里按 Alt+F11，粘贴如下代码：

 Sub   取消链接()   
  For   a   =   1   To   ThisDocument.Hyperlinks.Count   
          ThisDocument.Hyperlinks(1).Delete   
  Next   
  End   Sub

然后按下 F5——> 选择运行 ——> 关闭页面 ——>word 完成