Question

我目前正在使用此命令保存我的Excel文件：

 ActiveWorkbook.SaveAs Filename:="pleasework", FileFormat:=52

但保存时，会将其保存在文档中。

我想将它保存在宏的当前位置（文件的位置，它被激活）。
有什么建议？将其更改为：

Filename:="C:/pleasework"

赢了工作......

感谢！

Answer 1

尝试以下内容

...
ActiveWorkbook.SaveAs Filename:=ActiveWorkbook.Path & "\pleasework", FileFormat:=52
...

此外，您可能首先要检查Application.ActiveWorkbook.Path是否返回有效路径，以防您当前打开的文件尚未保存，但您不会尝试将其保存到无效路径。

Answer 2

试试这个

Option Explicit
Sub Book_Path()

    Debug.Print ThisWorkbook.Path

    ActiveWorkbook.SaveAs FileName:=ThisWorkbook.Path & "\" & "pleasework", FileFormat:=52

End Sub

如何在当前位置保存VBA

2 个答案: