在当前文件夹中以新格式保存文件名

Question

我在Word模板中设置了以下宏，将我的文件保存到当前保存模板的位置，但是在具有新名称和文件格式的子文件夹中。每次运行宏时，都会出现“命令失败”错误。

这是我的代码：

pathName = ActiveDocument.Path & "\Periodic Count\CaseManager_CSV.txt"
ActiveDocument.SaveAs fileName:=pathName, FileFormat:=wdFormatText

Answer 1

我认为您的问题的原因来自未保存的文档，该文档没有路径。因此，您的pathName variable值只有这样："\Periodic Count\CaseManager_CSV.txt"这是不正确的。

正如您所提到的，您希望保存在保存模板的文件夹的子文件夹中。您可能应该以这种方式修改pathName variable：

pathName = ActiveDocument.AttachedTemplate.Path & "\Periodic Count\CaseManager_CSV.txt"