vba中提供了FileCopy语句可以直接复制文件。
它的语法如下:
FileCopy source, destination
其中source参数为要复制的文件,destination参数为复制后的文件。
代码如下:
Sub QQ1722187970() Dim SourceFile As String Dim DestinationFile As String SourceFile = "c:\1.txt" DestinationFile = "c:\2.txt" FileCopy SourceFile, DestinationFile End Sub
如果source参数表示的文件不存在会报错。
发表评论