Cara Menghapus Baris Kosong di Excel dengan Mudah dan Cepat

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:

  1. Buka lembar kerja Excel yang ingin Anda hapus baris kosongnya, lalu tekan shortcut “Alt + F11” pada keyboard untuk membuka jendela “Visual Basic Editor”.
  2. Klik menu “Insert”, lalu pilih opsi “Module”. Excel akan menambahkan sebuah modul baru di bawah “Project Explorer”.
  3. 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
  1. 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.

Kesimpulan

Dalam artikel ini, kita telah membahas empat cara untuk menghapus baris kosong di Excel dengan mudah dan cepat, yaitu:

Anda bisa memilih cara yang paling sesuai dengan kebutuhan dan preferensi Anda. Semoga artikel ini bermanfaat dan selamat mencoba!

Artikel Terbaru