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

  1. Home
  2. Excel
  3. VBA
  4. FileSystemObject
  5. Fileオブジェクト

【書式】

File.Copy destination[, overwrite]

ファイルをコピーします。

引数destinationにはコピー先のパスまたはファイル名を指定します。

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

FileオブジェクトのCopyメソッドは、FileSystemObjectオブジェクトのCopyFileメソッドと同じ働きをします。 
Sub test68()
    Dim FSO As Object
    Set FSO = CreateObject("Scripting.FileSystemObject")
    ''C:\Work\Book1.xlsxをC:\Tmpフォルダにコピーします
    FSO.GetFile("C:\Work\Book1.xlsx").Copy "C:\Tmp\"
    ''C:\Work\Book1.xlsxをC:\TmpフォルダにReport.xlsxという名前でコピーします
    FSO.GetFile("C:\Work\Book1.xlsx").Copy "C:\Tmp\Report.xlsx"
    Set FSO = Nothing
End Sub