Cara Cepat Menghapus Baris Kosong Pada Excel Dengan Macro VBA

Di artikel kali ini kita akan bahas cara cepat menghapus baris kosong pada excel dengan macro VBA, namun karna tutorial ini menggunakan baris data yang sedikit kita juga bisa menghapus baris kosong pada excel dengan cara manual yaitu menggunakan dialog box Go To Special.

Menghapus Baris Kosong Pada Excel Dengan Dialog Box Go To Special

• Misalkan kita mempunyai data seperti pada gambar yang berisi beberapa baris data yang kosong

Cara sederhana menghapusnya bisa langsung mendelete baris yang kosong, namun tentu akan sulit jika terdapat banyak data yang kosong dan menghapusnya satu persatu, maka dari itu kita gunakan cara cepat berikut

• Pertama pilih keseluruhan data set, dalam contoh ini (A1 : C15)
• Klik F5 untuk memunculkan Go To Dialog Box, atau pilih Home -> Editing -> Find & Select -> Go To
• Setelah muncul dialog box, pilih tombol Special
• Kemudian pilih Blank pada dialog box yang muncul dan klik OK

  

Maka baris kosong pada data set akan terpilih semuanya, setelah itu tinggal klik kanan pada sembarang sel yang sudah terpilih dan pilih Delete, kemudian pilih Shift Cell Up atau Entire Row untuk menghapus baris sel yang kosong tadi

Cukup mudah bukan tutorial cara cepat menghapus baris kosong pada excel ini. Nah, untuk selanjutnya bagaimana jika data yang kita punya terdiri dari banyak baris data dan banyak baris kosongnya, solusinya bisa menggunakan macro VBA berikut

Menghapus Baris Kosong Pada Excel Dengan Macro VBA

Cara cepat berikutnya adalah dengan membuat tombol makro pada Quick Access Toolbar (atau kita dapat sebut QAT), dengan tombol makro ini maka akan semakin mudah menghapus baris data yang kosong, cukup dengan memilih keseluruhan data set kemudian klik tombol makro tersebut, cara membuatnya seperti pada tutuorial berikut:

• Pertama dalam keadaan workbook terpilih, klik Alt + F11, ini untuk membuka jedela editor VBA
• Dalam VBA editor, klik kanan pada sheet1 dan pilih Insert -> Module

  

• Pada jendela Module paste kan kode berikut

  Sub SelectBlanks()
  Selection.SpecialCells(xlCellTypeBlanks).Select
  End Sub

• Kemudian tutup VBA editor nya tau klik Alt + F11 lagi
• Klik kanan pada sembarang menu ribon, hingga muncul pilihan Costumize Quick Access Toolbar

  

• Pilih Macros pada drop down menu di dialog box option

  

• Kemudian pilih SelectBlank, yang merupakan macro yang sudah kita buat tadi

  

• Klik OK, maka macro sudah ada di QAT untuk sewaktu-waktu bisa digunakan untuk memilih baris yang kosong pada data excel yang ada.

Namun pastikan untuk menyimpan file excel ini dalam format .xls atau .xlsm untuk bisa menjalankan macronya.

Silahkan mencoba tutuorial ini, jika ada pertanyaan seputar cara cepat menghapus baris kosong pada excel ini silahkan gunakan kolom komentar dibawah. Trims..