Excel文件目录传输

Question

有关如何将特定文件传输到特定目录的问题。

基本上，这些图像具有唯一的文件名，并将被传输到指定的目录，我想使用Excel完成它。

因此在A1中是图像文件位置，B1是我们传输文件的位置。

实施例

• A1 = J:\folder1\，B1 = J:\folder2\

• A2 =是文件名 image.jpg B2 =是我要放置的位置 image.jpg

  例如，我想将J:\folder1\image.jpg复制到J:\folder2\location1\

Answer 1

- 在Scripting.FileSystemObject中使用适当的方法。 为了帮助您入门，您需要包括：

Dim fso As Object
Set fso = VBA.CreateObject("Scripting.FileSystemObject")

然后你可以使用

fso.CopyFile(source, destination[, overwrite] )

源和目的地是文件的全名（包括路径）。

-Simpler但选项较少（没有覆盖选项）

Dim SourceFile, DestinationFile As String
SourceFile = "SRCFILE"   ' Define source file name.
DestinationFile = "DESTFILE"   ' Define target file name.
FileCopy(SourceFile, DestinationFile)   ' Copy source to target.