#102
FileSystemObjectオブジェクトのメソッドを利用すると、フォルダの新規作成、フォルダ単位のコピーや削除といったフォルダ管理の操作を行うことができます。
Dim Fso As Object
'FileSystemObjectオブジェクトを生成します
Set Fso = CreateObject("Scripting.FileSystemObject")
'D:\tmp\FSO フォルダを作成します
Fso.CreateFolder "D:\tmp\FSO"
'D:\tmp\FSO のフォルダごと E:\tmp\ にコピーします
'結果的に E:\tmp\FSO フォルダが作成されます
Fso.CopyFolder "D:\tmp\FSO", "E:\tmp\"
'E:\tmp\FSO を削除します
Fso.DeleteFolder "E:\tmp\FSO"
'FileSystemObjectオブジェクトを生成します
Set Fso = CreateObject("Scripting.FileSystemObject")
'D:\tmp\FSO フォルダを作成します
Fso.CreateFolder "D:\tmp\FSO"
'D:\tmp\FSO のフォルダごと E:\tmp\ にコピーします
'結果的に E:\tmp\FSO フォルダが作成されます
Fso.CopyFolder "D:\tmp\FSO", "E:\tmp\"
'E:\tmp\FSO を削除します
Fso.DeleteFolder "E:\tmp\FSO"
