VBA Word宏：使用标准前缀另存为现有.docx文件名

我试图构造一个宏，它接受一个活动文档并使用相同的文件名保存它，但添加一个非变量前缀

我正在处理的文档具有超链接，根据互联网，这似乎是我无法使用此代码的原因：

Sub SaveAsDigital()
'
' Flatten Macro
'
'
ActiveDocument.SaveAs2 FileName:=ActiveDocument.Path & Application.PathSeparator & "Digital_" & ActiveDocument.Name

End Sub

这将返回运行时错误“4198”，与文档中存在的超链接相关（我无法摆脱这些）

---

任何帮助都将不胜感激！谢谢

这似乎对我有用，是其他文档的超链接吗？@Omar没有其他文档的超链接。该文件包括目录和权限表。此外，还有邮件合并字段以及对附录的交叉引用。这完全是一个文档…如果您查看该运行时错误，它似乎在运行具有链接字段的文档时出现问题。这似乎对我有效，是另一个文档的超链接吗？@Omar没有其他文档的超链接。该文件包括目录和权限表。此外，还有邮件合并字段以及对附录的交叉引用。这完全是一个文档…如果您查看该运行时错误，它似乎在运行具有链接字段的文档时出现问题。这似乎对我有效，是另一个文档的超链接吗？@Omar没有其他文档的超链接。该文件包括目录和权限表。此外，还有邮件合并字段以及对附录的交叉引用。这完全是一个文档…如果您查看该运行时错误，那么对于具有链接字段的文档，它似乎在运行时出现问题。