Question

我想将2张xlsm文件保存为MSDOS文件filea，扩展名为.bat，这样我就可以将它们作为脚本运行，并将它们保存到当前目录中。什么会导致它默认为我的文档？

我不是编码员 - 我使用Record Macro创建它，然后编辑它以取出特定的路径。我实际上有这个工作，直到我在开始时添加了ActiveWorkbook.Save，并且ActiveWorkbook.Close SaveChanges：= False，所以我不会因意外地手动保存而丢失格式。现在它将文件保存到我的文档，无论我尝试什么。我无法想象这会导致它，并且取出这两条线并没有解决它。我错过了什么？

这是我的代码：

ActiveWorkbook.Save
Sheets("Copy Script").Select
ActiveWorkbook.SaveAs Filename:= _
    "copy.bat", FileFormat:= _
    xlTextMSDOS, CreateBackup:=False
Sheets("Plot Script").Select
ActiveWorkbook.SaveAs Filename:= _
    "plot.bat", FileFormat:= _
    xlTextMSDOS, CreateBackup:=False
ActiveWorkbook.Close SaveChanges:=False

Answer 1

试试这个

ActiveWorkbook.SaveAs Filename:= ThisWorkbook.Path & "\copy.bat", FileFormat:= xlTextMSDOS, CreateBackup:=False

VBA - Excel工作表不会保存到当前目录 - 默认为我的文档

1 个答案: