ファイルをコピー（FileCopy ステートメント）
FileCopy ステートメント
ファイルをコピーします。ただし、開いているファイルに対して、FileCopy ステートメント を実行しようとするとエラーが発生します。
【書式】
FileCopy ( source, destination )
引数・戻り値
- source ・・・ コピー元のファイル名を文字列で、指定します。パス（ディレクトリまたはフォルダー、およびドライブ）を含めることができます。パスを省略するとカレントフォルダを指定したことになります。
- destination ・・・ コピー先のファイル名を文字列で、指定します。パス（ディレクトリまたはフォルダー、およびドライブ）を含めることができます。パスを省略するとカレントフォルダを指定したことになります。
引数 source、destination を省略することはできません。
コピー先に同名のファイルが存在する場合は、上書き保存するので注意が必要です。
- source ・・・ コピー元のファイル名を文字列で、指定します。パス（ディレクトリまたはフォルダー、およびドライブ）を含めることができます。パスを省略するとカレントフォルダを指定したことになります。
- destination ・・・ コピー先のファイル名を文字列で、指定します。パス（ディレクトリまたはフォルダー、およびドライブ）を含めることができます。パスを省略するとカレントフォルダを指定したことになります。
引数 source、destination を省略することはできません。
コピー先に同名のファイルが存在する場合は、上書き保存するので注意が必要です。
FileCopy ステートメント 使用例
サンプルVBAソース
|
1 2 3 4 5 6 7 8 9 10 11 |
Sub Sample_FileCopy() '閉じているブックをコピー（上書き） FileCopy "C:\Documents\test01.xlsx", "C:\Documents\test02.xlsx" 'テキストファイルをコピー FileCopy "C:\Documents\memo01.txt", "C:\Documents\memo02.txt" End Sub |
実行結果
実行前
実行後
関連記事
-
-
「名前を付けて保存」ダイアログボックスを表示（GetSaveAsFilename メソッド）
GetSaveAsFilename メソッド 「名前を付けて保存」ダイアログボッ …
-
-
Excelでテキストファイルを開く（OpenText メソッド）
Excelでテキストファイルを開く OpenText メソッドで、テキストファイ …
-
-
FileDialogFilters コレクション・FileDialogFilter オブジェクト
FileDialogFilters コレクション FileDialog オブジェ …
-
-
特殊フォルダを取得（wsh.SpecialFolders）
CreateObject 関数：特殊フォルダを取得（WSH.SpecialFol …
-
-
Excel を終了する（Quit メソッド）
Excel を終了する（Quit メソッド） Quit メソッドを実行すると、E …
-
-
ファイルのタイムスタンプを取得（FileDateTime 関数）
ファイルのタイムスタンプを取得 ファイルのタイムスタンプを取得するには、File …
-
-
ディレクトリまたはフォルダの削除（RmDir ステートメント）
ディレクトリまたはフォルダの削除 ディレクトリまたはフォルダを削除するには、Rm …
-
-
テキストファイル：データを書き込む（Print # ステートメント）
Print # ステートメント Open ステートメント をシーケンシャル出力モ …
-
-
テキストファイル：データを書き込む（Put ステートメント）
Put ステートメント Open ステートメント をランダムアクセスモード（Ra …
-
-
「ファイルを開く」ダイアログボックスを表示（GetOpenFilename メソッド）
GetOpenFilename メソッド ファイル名を取得するための、「ファイル …