エクセルのVBAで、フォルダごとコピーしたいのですが…
Dドライブの”TEST"というフォルダを、同じくDドライブに"TEST2"という名前でコピーしたいのです。
Private Sub sakusei_Click()
Dim myFSO As New FileSystemObject
myFSO.CopyFolder "D:\TEST", "D:\TEST2"
End Sub
ではうまくいかないのです。
私は初心者なので調べてもよくわからないので、
有識者の方、是非教えてください。
宜しくお願い致します。
No.2
- 回答日時:
[イミディエイト]
? FolderCopy("D:\Test", "D:\Test2")
True
で、コピーできたようです。
Public Function FolderCopy(ByVal F As String, ByVal T As String) As Boolean
On Error GoTo Err_FolderCopy
Dim isOK As Boolean
Dim fso As Object
isOK = True
Set fso = CreateObject("Scripting.FIleSystemObject")
fso.CopyFolder F, T
Exit_FolderCopy:
FolderCopy = isOK
Exit Function
Err_FolderCopy:
MsgBox Err.Description & "( FolderCopy)"
isOK = False
Resume Exit_FolderCopy
End Function
Private Sub sakusei_Click()
Dim myFSO As New FileSystemObject
myFSO.CopyFolder "D:\TEST", "D:\TEST2"
End Sub
両者の違いは Set文の有無ですね。
Dim fso As FileSystemObject
Set fso = New FileSystemObject
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA This Workbookモジュールを別ファイルにコピーする方法 1 2022/09/14 01:51
- Android VBA、フォルダのパスに環境文字 ㉑ があり、VBAが機能しません。 2 2022/07/27 09:16
- Visual Basic(VBA) VBAでファイル名を指定して保存するとき 4 2023/03/26 21:55
- Excel(エクセル) 【VBA】エクセルで選択した範囲の値のみをクリップボードにコピーするコードについて 3 2023/03/08 17:41
- Excel(エクセル) 1つのファイルを3つのフォルダにファイル名を【明日の日付】にして、コピーをしたい 2 2022/12/21 17:43
- Visual Basic(VBA) エクセルのマクロについて教えてください 物件ごとのフォルダを作成してます そのフォルダ内にサブフォル 2 2023/07/02 17:58
- Visual Basic(VBA) あるフォルダーのファイルを違う親フォルダーのサブフォルダーに移したい 11 2023/02/15 19:00
- Excel(エクセル) 複数のブックをひとつのブック(複数のシートにまとめる)場合にシートとの順番について 5 2022/12/28 20:47
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/05/24 08:33
- Excel(エクセル) VBA フォルダ見える化のコードについて 2 2023/06/19 15:04
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
DVD-RAMからDVD-Rにコピーする...
-
SDカードをパソコンに落とす...
-
ファイル 「送る」と「コピー...
-
ROBOCOPYで移行元と先でサイズ...
-
ひとつのファイルを一括で複数...
-
VBAでネットワークコンピュータ...
-
Windows10 ファイルの置き換え...
-
"コピーできないプロパティ"が...
-
RealSync
-
98SE USB インストール中に uhc...
-
VBAマクロ 実行時エラーが出た...
-
複数のフォルダへ同時にファイ...
-
MS-DOS フロッピーディスクのコ...
-
送り側のファイルが使用中・・...
-
HDDへのOSコピーについて
-
リモートデスクトップ時のファ...
-
外付けHDDのデータ転送が遅い
-
Cubase7でgroove agentの不具合
-
エクセルに添付された画像をフ...
-
i Phoneから画像が消えた!
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ひとつのファイルを一括で複数...
-
複数のフォルダへ同時にファイ...
-
パソコン、ワンドライブをプリ...
-
Windows10 で登録した外字を他...
-
DOSコマンドでファイルをコピー...
-
XCOPYで指定したフォルダとファ...
-
SDカードをパソコンに落とす...
-
robocopyでフォルダ自体のコピ...
-
ファイル 「送る」と「コピー...
-
ファイルコピーせずフォルダの...
-
VBAマクロ 実行時エラーが出た...
-
ROBOCOPYで移行元と先でサイズ...
-
ファルダだけコピー
-
VBAでネットワークコンピュータ...
-
ファイルのコピー正常終了を確...
-
外付HDDにフォルダーが作れず、...
-
エクセルに添付された画像をフ...
-
外付けHDDのデータ転送が遅い
-
DVD-RAMからDVD-Rにコピーする...
-
WMP の曲をUSBメモリーにコ...
おすすめ情報