Warning: file_get_contents(/data/phpspider/zhask/data//catemap/5/excel/23.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181

Warning: file_get_contents(/data/phpspider/zhask/data//catemap/3/sockets/2.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Excel Vba更改要保存的目录_Excel_Vba - Fatal编程技术网

Excel Vba更改要保存的目录

Excel Vba更改要保存的目录,excel,vba,Excel,Vba,我想在一个目录中保存一个文件,该目录的名称会根据上个月的名称而变化。代码如下: name_month = MonthName(Month(Date) - 1) Set Newbook = Workbooks.Add With Newbook .Title = "TESO1" .SaveAs Filename:="C:\Users\ee31264\Desktop\Mensile Automat\name_month \send\TESO1.xlsx" End With Newbook

我想在一个目录中保存一个文件,该目录的名称会根据上个月的名称而变化。代码如下:

name_month = MonthName(Month(Date) - 1) 

Set Newbook = Workbooks.Add
    With Newbook
.Title = "TESO1"
.SaveAs Filename:="C:\Users\ee31264\Desktop\Mensile Automat\name_month \send\TESO1.xlsx"
End With

Newbook.Close

不幸的是,我写VBA的那个月的名字不明白我的意思

这是因为您需要告诉Excel您对它所说的内容是否应该作为变量或文本字符串读取。使用“”表示它是文本字符串,不应进行计算

使用以下命令:

Filename:="C:\Users\ee31264\Desktop\Mensile Automat\" & name_month & "\send\TESO1.xlsx"
还请记住,在较新版本的Excel中,还必须使用
FileFormat:=51
(xlsx,使用52表示xlsm)来指定文件格式