Bagaimana cara mengonversi beberapa file xls menjadi file xlsx di Excel?
Untuk mengonversi file XLS Excel lama ke file XLSX baru, Anda dapat menggunakan fitur Simpan Sebagai di Excel. Namun, jika Anda perlu mengonversi beberapa file XLS sekaligus, bagaimana Anda dapat menangani tugas ini secara efisien?
- Ubah beberapa format xls menjadi format xlsx dengan fungsi Save As satu per satu
- Ubah beberapa format xls menjadi format xlsx sekaligus dengan kode VBA
- Konversikan beberapa format xls ke format xlsx sekaligus dengan fitur canggih
- Ubah Beberapa Buku Kerja Menjadi File PDF sekaligus
Ubah beberapa format xls menjadi format xlsx dengan fungsi Save As satu per satu
Fungsi Simpan Sebagai di Excel dapat membantu Anda mengonversi format xls buku kerja lama ke format xlsx baru satu per satu.
1. Buka buku kerja Anda yang ingin Anda ubah formatnya.
2. Klik File > Save As, Dan Save As dialog akan ditampilkan, tentukan folder untuk menempatkan format file baru, lalu klik Save as type daftar drop-down untuk memilih Excel Workbook, lihat tangkapan layar:
3. Lalu klik Simpan untuk menutup dialog, dan format Excel ini telah diubah dari xls menjadi xlsx.
Ubah beberapa format xls menjadi format xlsx sekaligus dengan kode VBA
Jika Anda ingin mengonversi beberapa file xls menjadi file xlsx sekaligus tanpa menyimpan satu per satu, di sini, saya akan berbicara tentang kode VBA untuk Anda, lakukan dengan langkah-langkah berikut:
1. Tahan ALT + F11 kunci untuk membuka Microsoft Visual Basic untuk Aplikasi jendela.
2. Klik Menyisipkan > Modul, dan tempel kode berikut di Modul Jendela.
Kode VBA: Konversi beberapa format xls ke format xlsx sekaligus
Sub ConvertToXlsx()
'Updateby Extendoffice
Dim strPath As String
Dim strFile As String
Dim xWbk As Workbook
Dim xSFD, xRFD As FileDialog
Dim xSPath As String
Dim xRPath As String
Set xSFD = Application.FileDialog(msoFileDialogFolderPicker)
With xSFD
.Title = "Please select the folder contains the xls files:"
.InitialFileName = "C:\"
End With
If xSFD.Show <> -1 Then Exit Sub
xSPath = xSFD.SelectedItems.Item(1)
Set xRFD = Application.FileDialog(msoFileDialogFolderPicker)
With xRFD
.Title = "Please select a folder for outputting the new files:"
.InitialFileName = "C:\"
End With
If xRFD.Show <> -1 Then Exit Sub
xRPath = xRFD.SelectedItems.Item(1) & "\"
strPath = xSPath & "\"
strFile = Dir(strPath & "*.xls")
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Do While strFile <> ""
If Right(strFile, 3) = "xls" Then
Set xWbk = Workbooks.Open(Filename:=strPath & strFile)
xWbk.SaveAs Filename:=xRPath & strFile & "x", _
FileFormat:=xlOpenXMLWorkbook
xWbk.Close SaveChanges:=False
End If
strFile = Dir
Loop
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
3. tekan F5 kunci untuk menjalankan kode ini, dan sebuah jendela akan ditampilkan, pilih folder yang berisi file xls yang ingin Anda ubah, lihat tangkapan layar:
4. Klik OK, jendela lain muncul, pilih jalur folder tempat Anda ingin mengeluarkan file baru yang dikonversi, lihat tangkapan layar:
5. Klik OKSetelah konversi selesai, navigasikan ke folder yang ditentukan untuk melihat hasilnya.
Konversikan beberapa format xls ke format xlsx sekaligus dengan fitur canggih
Dengan ini Kutools untuk Excel'S Format Converter utilitas, Anda dapat mengonversi beberapa format xls ke format xlsx atau sebaliknya, itu juga dapat membantu Anda mengonversi beberapa buku kerja ke file PDF sekaligus.
1. Klik Kutools Ditambah > Buku catatan > Format Converter, lihat tangkapan layar:
2. Dan kotak prompt akan muncul untuk mengingatkan Anda harus menutup buku kerja yang ingin Anda ubah. Lihat tangkapan layar:
3. Klik OK, lalu, di Pengonversi Format File dialog, tentukan opsi berikut:
- Di bawah Jenis konversi daftar drop-down, pilih Excel 97-2003 ke Excel 2007 atau lebih tinggi;
- Kemudian klik Add tombol untuk menambahkan file xls yang ingin Anda konversi, Anda dapat menambahkan buku kerja dari disk komputer atau OneDrive sesuai kebutuhan.
4. Setelah memasukkan file xls, masih dalam file Pengonversi Format File kotak dialog, silakan klik untuk memilih satu jalur folder untuk mengeluarkan file yang dikonversi, dan kemudian tentukan beberapa operasi yang Anda butuhkan di bagian bawah kotak dialog, lihat tangkapan layar:
- Jika buku kerja di subfolder perlu diubah juga, silakan periksa Sertakan subfolder saat menambahkan folder kotak centang;
- Jika Anda ingin menghapus file asli setelah mengonversi, silakan periksa Hapus file sumber setelah konversi kotak;
- Jika Anda ingin mempertahankan tanggal modifikasi dari file asli, silakan periksa Simpan tanggal modifikasi dari file asli kotak;
- Struktur direktori file dapat dipertahankan dengan memeriksa Struktur direktori file dipertahankan saat dikonversi kotak;
5. Lalu klik OK untuk memulai konversi. Setelah konversi selesai, navigasikan ke folder yang ditentukan untuk melihat hasilnya. Lihat tangkapan layar:
Kutools untuk Excel - Sempurnakan Excel dengan lebih dari 300 alat penting. Nikmati fitur AI gratis selamanya! Get It Now
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!