Word.Application SaveCopyAs未知运行时错误：800A1704

Question

我写了一个VBScript将Word 97-2003文档转换为Word 2016文档（我在Windows 10 v1709,64位企业版上安装了Microsoft Office 2016）。

这是重现问题的最小代码：

test.doc

打开Word，创建一个空白文档并将其另存为＆＃34; Word 97-2003 Document＆＃34;文件名为.xls，并将其放在与VBScript相同的目录下。然后运行脚本。

但是，如果您稍微修改上述脚本并尝试将.xlsx转换为.ppt或.pptx转换为<div class="form-group"> @Html.LabelFor(m => m.Telefone, new { @class = "font-weight-bold" }) @Html.TextBoxFor(m => m.Telefone, new { @class = "form-control is-valid", @placeholder = "Digite seu telefone" }) @Html.ValidationMessageFor(m => m.Telefone, "", new { @class = "text-danger" }) </div> ，则可行。实际上，代码是从我之前写的完全工作的PPT到PPTX转换器修改的。它在同一系统上的PowerPoint 2016没有任何问题，效果很好。制作XLS到XLSX转换器的另一个修改也适用于Excel 2016。

我的Google-fu没有用，也没有重新安装Office 2016帮助。我还尝试使用新安装的Windows 10 v1709 Enterprise和Office 2016（均为64位）的其他2台计算机，并出现同样的错误。

任何想法如何将其保存为当前VBScript的DOCX？

Answer 1

只需录制一个宏，就会生成以下代码，用于将.doc中的单词保存到.docx扩展名

doOn...