Menggunakan Macro untuk Menghapus Baris Kosong di Excel
Cara ini cocok untuk menghapus baris kosong yang jumlahnya sangat banyak atau jika Anda sering melakukan tugas ini dan ingin mempersingkat waktu dan usaha Anda. Cara ini membutuhkan Anda untuk membuat dan menjalankan sebuah macro atau kode VBA yang dapat menghapus baris kosong secara otomatis. Berikut langkah-langkahnya:
- Buka lembar kerja Excel yang ingin Anda hapus baris kosongnya, lalu tekan shortcut “Alt + F11” pada keyboard untuk membuka jendela “Visual Basic Editor”.
- Klik menu “Insert”, lalu pilih opsi “Module”. Excel akan menambahkan sebuah modul baru di bawah “Project Explorer”.
- Ketikkan kode berikut di jendela modul:
Sub DeleteBlankRows() Dim ws As Worksheet Dim rng As Range Dim lastRow As Long Dim i As Long Set ws = ActiveSheet lastRow = ws.Cells(ws.Rows.Count, 1).End(xlUp).Row Set rng = ws.Range("A1:A" & lastRow) Application.ScreenUpdating = False For i = lastRow To 1 Step -1 If WorksheetFunction.CountA(rng.Rows(i)) = 0 Then rng.Rows(i).EntireRow.Delete End If Next i Application.ScreenUpdating = True MsgBox "Blank rows have been deleted." End Sub
- Klik menu Run, lalu pilih opsi Run Sub/UserForm atau tekan shortcut F5 pada keyboard untuk menjalankan macro. Excel akan menghapus semua baris kosong yang ada di lembar kerja Anda dan menampilkan pesan konfirmasi.
Artikel Menarik Lainnya
Kesimpulan
Dalam artikel ini, kita telah membahas empat cara untuk menghapus baris kosong di Excel dengan mudah dan cepat, yaitu:
- Menghapus baris kosong secara manual
- Menggunakan fitur Go To Special
- Menggunakan filter
- Menggunakan macro
Anda bisa memilih cara yang paling sesuai dengan kebutuhan dan preferensi Anda. Semoga artikel ini bermanfaat dan selamat mencoba!