如何在VBA中保存当前位置

我正在用这个命令保存我的excel文件：

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

但是，当它保存时，它将其保存在文档中。

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

 Filename:="C:/pleasework" 

不会工作…

谢谢 ！

Answer 1

请尝试以下方法

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

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

Answer 2

尝试这个

 Option Explicit Sub Book_Path() Debug.Print ThisWorkbook.Path ActiveWorkbook.SaveAs FileName:=ThisWorkbook.Path & "\" & "pleasework", FileFormat:=52 End Sub