Sub 按钮6_Click()
Dim SourceFile, Destination
FileSourceFile = "E:\vba\1.xls"
DestinationFile = "E:\2\"
FileCopy SourceFile, Destination
End Sub
这段代码运行时提示 路径/文件访问错误。请问怎么办
五、filecopy拷贝文件
语法:FileCopy source, destination
部分
描述
source
必要参数。字符串表达式,用来表示要被复制的文件名。source 可以包含目录或文件夹、以及驱动器。
destination
必要参数。字符串表达式,用来指定要复制的目地文件名。destination 可以包含目录或文件夹、以及驱动器。
说明:如果想要对一个已打开的文件使用 FileCopy语句,则会产生错误。另外在使用前建议使用dir判断下是否存在该文件
Sub FileCopytest()
FileCopy ThisWorkbook.Path & "\Test\Test.txt", "C:\Test.txt"
End Sub
温馨提示:答案为网友推荐,仅供参考