機能と数式 | VBA | セミナー | オンラインソフト | お問い合わせ | その他
Top > Excel > VBA > FileSystemObject

Folderオブジェクト - Copyメソッド



【書式】
Folder.Copy destination[, overwrite]

フォルダまたはフォルダ内の全ファイルをコピーします。

引数destinationにはコピー先のパスを指定します。引数destinationの最後に\がないときは、コピー元フォルダ内存在する全ファイルを引数destinationで指定したフォルダにコピーします。引数destinationの最後が\で終わるときは、コピー元フォルダを引数destinationで指定したフォルダのサブフォルダとしてコピーします。

引数overwriteは省略可能です。Trueを指定すると既存のフォルダやファイルを上書きします。Falseを指定すると上書きせずにエラーになります。省略するとTrueが指定されたとみなされます。

FolderオブジェクトのCopyメソッドは、FileSystemObjectオブジェクトのCopyFolderメソッドと同じ働きをします。
Sub test53()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Workフォルダ内の全ファイルをC:\Tmpフォルダにコピーします
    FSO.GetFolder("C:\Work").Copy "C:\Tmp"
    ''C:\WorkフォルダをC:\Tmpフォルダのサブフォルダとしてコピーします
    FSO.GetFolder("C:\Work").Copy "C:\Tmp\"
    Set FSO = Nothing
End Sub



このエントリーをはてなブックマークに追加