Bagaimana cara mengganti nama banyak file dari sebuah folder di Excel?
Mungkin sebagian besar dari kita mengalami masalah ini sehingga kita perlu mengganti nama banyak file dalam satu folder, untuk mengganti nama nama file satu per satu akan membuat kita gila jika ada ratusan atau ribuan file di folder itu. Apakah ada fungsi yang baik bagi kita untuk menangani tugas ini?
Buat daftar semua nama file dari folder tertentu di lembar kerja dengan kutools untuk Excel
Ubah nama beberapa file folder di Excel dengan kode VBA
Buat daftar semua nama file dari folder tertentu di lembar kerja dengan kutools untuk Excel
Jika ada beberapa file yang ingin Anda ganti namanya, pertama, Anda bisa mencantumkan nama file lama di kolom lembar kerja, lalu masukkan nama file baru yang ingin Anda ganti. Untuk mencantumkan semua file dengan cepat di lembar kerja, Anda dapat menggunakan Kutools untuk Excel'S Daftar Nama File utilitas
Setelah menginstal Kutools untuk Excel, lakukan hal berikut :( Unduh Gratis Kutools untuk Excel Sekarang )
1. Klik Kutools Ditambah > Ekspor Impor > Daftar Nama File, lihat tangkapan layar:
2. di Daftar Nama File kotak dialog, klik 
tombol untuk memilih folder file yang Anda ingin daftar file, dan kemudian klik Semua data dari Jenis file, lihat tangkapan layar:
3. Lalu klik OK tombol, semua nama file telah dicantumkan di kolom lembar kerja baru, serta beberapa atribut file, dan sekarang, Anda dapat menghapus kolom yang tidak diinginkan lainnya dan hanya membiarkan File Name kolom, lihat tangkapan layar:
Klik untuk mengetahui lebih banyak tentang fitur Daftar Nama File ini ...
Unduh Gratis Kutools untuk Excel Sekarang
Ubah nama beberapa file folder di Excel dengan kode VBA
Setelah mencantumkan semua nama file asli dalam satu kolom A, dan Anda harus mengetikkan nama file baru di kolom B seperti gambar berikut yang ditampilkan:
Dan di sini saya akan berbicara tentang kode VBA yang dapat membantu Anda mengganti nama file lama dengan nama file baru sekaligus. Silakan lakukan dengan langkah-langkah berikut:
1. Tahan ALT + F11 kunci, dan itu membuka Jendela Microsoft Visual Basic untuk Aplikasi.
2. Klik Menyisipkan > Modul, dan tempelkan makro berikut di file Jendela modul.
Kode VBA: Ubah nama banyak file dalam satu folder
Sub RenameFiles()
'Updateby20141124
Dim xDir As String
Dim xFile As String
Dim xRow As Long
With Application.FileDialog(msoFileDialogFolderPicker)
.AllowMultiSelect = False
If .Show = -1 Then
xDir = .SelectedItems(1)
xFile = Dir(xDir & Application.PathSeparator & "*")
Do Until xFile = ""
xRow = 0
On Error Resume Next
xRow = Application.Match(xFile, Range("A:A"), 0)
If xRow > 0 Then
Name xDir & Application.PathSeparator & xFile As _
xDir & Application.PathSeparator & Cells(xRow, "B").Value
End If
xFile = Dir
Loop
End If
End With
End Sub
3. Setelah menempelkan kode, silakan tekan F5 kunci untuk menjalankan kode ini, dan di Browse jendela, pilih folder tempat Anda ingin mengubah nama file, lihat tangkapan layar:
4. Dan kemudian klik OK, semua nama file lama segera diganti dengan nama file baru. Lihat tangkapan layar:
 |
 |
 |
Catatan:
1. Ketika Anda membuat daftar nama file lama dan baru, ekstensi file harus disertakan.
2. Dalam kode di atas, referensi A: A menunjukkan daftar nama file lama yang ingin Anda ganti namanya, dan referensi B berisi nama file baru yang ingin Anda gunakan, Anda dapat mengubahnya sesuai kebutuhan
Demo: Ubah nama banyak file dari sebuah folder di Excel
Artikel terkait:
Bagaimana cara membuat lembar kerja urutan dari berbagai sel di Excel?
Bagaimana cara mengganti nama beberapa lembar kerja di Excel?
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!
