Vba: cara menyalin file dari satu lokasi ke lokasi lain

Anda dapat menggunakan metode CopyFile di VBA untuk menyalin file dari satu folder ke folder lain.

Berikut adalah cara umum untuk menggunakan metode ini dalam praktik:

 SubCopyMyFile ()

Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
    
'specify source file and destination folder
SourceFile = "C:\Users\bob\Desktop\Some_Data_1\soccer_data.txt"
DestFolder = "C:\Users\bob\Desktop\Some_Data_2\"

'copy file
FSO.CopyFile Source:=SourceFile, Destination:=DestFolder

End Sub

Makro khusus ini menyalin file bernama Soccer_data.txt dari folder bernama Some_Data_1 ke folder bernama Some_Data_2 .

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh : Cara copy file menggunakan VBA

Katakanlah kita memiliki file teks bernama football_data.txt yang terletak di folder bernama Some_Data_1 di desktop kita:

Sekarang katakanlah kita ingin menggunakan VBA untuk menyalin file teks ini ke folder lain bernama Some_Data_2 di desktop kita, yang saat ini berisi dua file teks:

Sebelum menggunakan VBA untuk menyalin file ini, kita harus mengaktifkan Microsoft Scripting Runtime terlebih dahulu di editor VB.

Untuk melakukannya, buka editor VB, lalu klik Alat , lalu klik Referensi :

Di jendela baru yang muncul, gulir ke bawah hingga Anda melihat Microsoft Scripting Runtime dan centang kotak di sebelahnya. Lalu klik oke .

Kemudian kita bisa membuat makro berikut untuk menyalin file:

 SubCopyMyFile ()

Dim FSO As New FileSystemObject
Set FSO = CreateObject("Scripting.FileSystemObject")
    
'specify source file and destination folder
SourceFile = "C:\Users\bob\Desktop\Some_Data_1\soccer_data.txt"
DestFolder = "C:\Users\bob\Desktop\Some_Data_2\"

'copy file
FSO.CopyFile Source:=SourceFile, Destination:=DestFolder

End Sub

Setelah makro ini dijalankan, file bernama football_data.txt akan disalin dari folder Some_Data_1 ke folder Some_Data_2 :

File football_data.txt asli juga akan tetap berada di folder Some_Data_1 :

Catatan : Anda dapat menemukan dokumentasi lengkap untuk metode CopyFile di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

Cara Membuat Folder Menggunakan VBA
Cara menghapus folder menggunakan VBA
Cara menghapus file menggunakan VBA