String 在文件夹之间复制文件时出现双引号问题

嘿，我是VBA的傀儡， 我有一个将所有pdf文件合并到临时文件夹中的单个文件中的子文件，我需要将合并的文件复制或移动到目标文件夹

我已尽了最大努力，但未能解决问题： 如果我简单地用双引号编写源和目标，一切都很好，但是我需要在多个工作簿上运行它，使用不同的目标文件夹，所以我的路径是通过连接一些变量来定义的。用Chr（34）添加双引号也不起作用

我选择了我试图使用的代码

谢谢你，毛罗

DestFile = reportdata & Range("Gruppo_Scelto") & ".pdf"
MyPath = Range("DirectoryTemporaneaPDF") & "\"
SourceFile = MyPath & DestFile
DestinationFile = Range("DirectoryStampePDF") & "\" & DestFile

FileCopy SourceFile, DestinationFile