word 中使用vba增加超级链接后提示病毒有办法禁止提示么？

admin

微软的支持里有说怎么做
下文摘自：http://support.microsoft.com/kb/925757/zh-cn
---------------------------------------------------------
禁用超链接警告为 2007 Office 程序

若要禁用在 2007 Office 程序时将 http:// 地址中的超链接警告备注： / / 或一个 ftp： / / 使用地址，您必须创建一个新的注册表子项。若要这样做，请按照下列步骤操作：

   1. 单击 开始，然后单击 运行。
   2. 在 打开 对话框中键入 regedit，然后单击 确定。
   3. 在注册表编辑器中找到以下注册表子项之一：
          * HKEY_CURRENT_USER\Software\microsoft\Office\12.0\common
          * HKEY_CURRENT_USER\Software\Policies\microsoft\Office\12.0\common
      注意您只需要修改这些注册表子项之一。您没有修改这两个它们。
      注意如果安全子项已存在，请在选择安全子项后跳至第 6 步。
   4. 单击注册表子项，指向 编辑 菜单上的 新建，然后单击 项。
   5. 键入 安全，然后按 enter 键的名称。
   6. 在 编辑 菜单上指向 新建，然后单击 dword 值。
   7. 键入 DisableHyperlinkWarning，然后按 enter 来命名该条目。
   8. 在右窗格中右键单击 DisableHyperlinkWarning，然后单击 修改。
   9. 在 编辑 dword 值 对话框中单击 十进制，然后键入 1 在 数值数据 下的。

      注意值为 0 使超链接的警告消息。值为 1 禁用超链接的警告消息。
  10. 单击 确定。
  11. 退出注册表编辑器。

回到顶端
如果您仍然会收到一条警告消息
从 microsoft Windows 可能还会收到一条警告消息。如果您继续收到一条警告消息，在这篇文章中步骤之后，使用下列方法之一解决此问题。

注意方法 1 只适用于 Windows XP 及更早版本。有关 Windows Vista 及更高版本中，请参见方法 2。
方法 1： 关闭"打开下载后确认"选项，为想要打开该文件类型

   1. 双击 我的电脑。
   2. 在 工具 菜单上单击 文件夹选项。
   3. 在 文件类型 选项卡上 已注册的文件类型 框中选择相应的文件名扩展名 （例如对于 wmv），然后单击 高级。
   4. 单击以清除 下载后确认打开 复选框，然后单击 确定。
   5. 文件夹选项 对话框中单击 关闭。

方法 2： 修改 HKEY_CLASSES_ROOT\wmvFile\EditFlags 注册表子项
如果该警告消息影响多台计算机，请使用此方法。

若要使该警告消息，请按照下列步骤操作：

   1. 单击 开始、 单击 运行，键入 regedit，然后单击 确定。
   2. 找到以下注册表子项：
      HKEY_CLASSES_ROOT\wmvFile\EditFlags
   3. 单击 EditFlags，然后单击 编辑 菜单上的 重命名。
   4. 键入 OldEditFlags，然后按 enter 键。
   5. 在 编辑 菜单上指向 新建，然后单击 dword 值。
   6. 键入 EditFlags，然后按 enter 键。
   7. 在 编辑 菜单上单击 修改。
   8. 在 编辑 dword 值 对话框中单击在 基数 下的 十六进制。
   9. 键入 10000，然后单击 确定。

若要重新启用警告消息，请按照下列步骤操作：

   1. 单击 开始、 单击 运行，键入 regedit，然后单击 确定。
   2. 找到以下注册表子项：
      HKEY_CLASSES_ROOT\wmvFile\EditFlags
   3. 单击 EditFlags，然后单击 编辑 菜单上的 修改。
   4. 键入 0，然后单击 确定。
---------------------------------------------------------
第一步也可以这么做，建立一个*.reg文件，用记事本编辑，输入下面两行分割线间的内容：
----------------------------------------
Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\microsoft\Office\12.0\common]
"DisableHyperlinkWarning"=dword:00000001
----------------------------------------
保存后，双击导入注册表