Excel VBA：在文件名中连接并导出为PDF格式时出错

Question

我正在做的是将保存为PDF文件的保存在​​保存在保存箱（也是一个文件夹）中的文件夹中。这个想法是为名称加入日期（包含在变量中）。我得到了1004错误，它说该文件可能已经打开，或者在保存时发生错误。如果我不尝试连接，那么它可以工作，但这对我不起作用，因为我需要每天更改日期。我尝试了很多方法，但都没有工作。请帮助=（

Dim dato_fechador As Variant 
Dim file_name As Variant 
dato_fechador = Format(Date, "dd-mm-yyyy") 
file_name = "C:\Users\Juan Pablo Zegers\Dropbox\Japanese\Práctica\" & dato_fechador & ".pdf" 
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=file_name, _ 
Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False 
End Sub 

enter image description here

Answer 1

从文件名的末尾删除反斜杠， “C：\用户\胡安·巴勃罗·席格斯\ Dropbox的\日本\实习课”