excel - 在vba中的不同目录中另存为.xlsx

Question

我正在尝试使用 SaveAs 方法将 .csv 文档另存为 .xls 文档。但是，当我尝试指定文件夹时，它失败了。

例如，它将保存到此处的某个默认目录(我的文档，这不是我准备好的位置):

Sub csv()
Workbooks.Open Filename:="directory/tmp.csv"
ActiveWorkbook.SaveAs Filename:="test.xlxs", FileFormat:=51, CreateBackup:=False
End Sub

但这失败了:

Sub csv()
Workbooks.Open Filename:="directory/tmp.csv"
ActiveWorkbook.SaveAs Filename:="otherdirectory/test.xlxs", FileFormat:=51, CreateBackup:=False
End Sub

是否有不同的方式来指定目录？

Answer 1

使用FileFormat:=xlCSV

这对我有用。

ActiveWorkbook.SaveAs Filename:="C:\test.csv", FileFormat:=6, CreateBackup:=False

如有疑问，请录制宏:)

FileFormat常数为xlCSV 。您可以输入 FileFormat:=xlCSV或者您可以使用它的实际值 6

编辑

我看到您已经编辑了问题:)让我再过一遍:)

Is there a different way to specify the directory? Thanks,

您指定的确切路径是什么？我用过Filename:="C:\Users\Siddharth Rout\Desktop\Book1.xlsx"而且效果非常好。