用vba完成文件夹的复制,需要使用FileSystemObject对象来完成,FileSystemObject的copyfolder方法可以把文件夹从一个地方复制到另一个路径。下面是一个示例代码:
Private Sub CommandButton1_Click()Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CopyFolder "d:\a", "e:\"
Set fso = Nothing
End Sub