Excel-VBA CopyFile运行时错误53(find文件说明)

我目前有一个VB脚本的错误,试图解决它,但仍然给出了标题中列出的错误。

该脚本的目的是复制基于工作表的input的文件名,然后将它们复制到一个目的地,保存名称中的当前date。

Set FSO = CreateObject("scripting.filesystemobject") FILE = Sheet1.Range("G3").Value FILE2 = Sheet1.Range("G4").Value SourceFile = Source & "\" & FILE & ".xls" DestFile = DestPath & "\" & FILE & " " & ShortDate & ".csv" SourceFile2 = Source & "\" & FILE2 & ".xls" DestFile2 = DestPath & "\" & FILE2 & " " & ShortDate & ".csv" 'Setsup Flag File Dim oFile As Object Set oFile = FSO.CreateTextFile(DestPath & "\OIS.FLAG") oFile.WriteLine Format(Sheets("Sheet1").Range("C7").Value, "yyyy/mm/dd") oFile.Close FSO.CopyFile SourceFile, DestFile FSO.CopyFile SourceFile2, DestFile2 

Source设置为“C:\ Users \\ Data”DestPath只是“C:\ Users \ updates”

当我运行脚本的第一个副本的工作,所以SourceFile被复制,但运行时错误发生的第二个SourceFile2,但我已经检查了多次,SourceFile2存在…

任何提示,或者我失踪的东西? 还检查了其他类似的线程,这不是因为string太长?

如果我inputSourceFile2的全名,即“C:\ Users \\ Data \ file2.xls”,那么它的工作原理,但我已经检查了一百万次的语法,似乎很好,也许一双新的眼睛会帮助,任何build议将大量赞赏:)