Cara Menghapus Baris Kosong di Excel – Pernahkah kamu mengelola data di Excel yang panjangnya puluhan hingga ratusan baris, tetapi ternyata banyak baris kosong yang membuat tampilan jadi tidak rapi? Atau mungkin kamu ingin membersihkan teks tertentu yang berulang di banyak sel, tanpa harus menghapus satu per satu secara manual?
Jika ya, kamu berada di artikel yang tepat. Di sini, kamu akan belajar cara menghapus baris kosong di Excel secara otomatis menggunakan VBA (Visual Basic for Applications), sekaligus menghapus teks tertentu dari sel, misalnya teks yang ditentukan di sel B1.
Cerita Umum Saat Mengolah Data Excel
Banyak orang yang bekerja dengan data di Excel—baik untuk keperluan laporan keuangan, daftar pelanggan, rekap absen, maupun database produk—mengalami hal yang sama: baris kosong muncul akibat impor data, copy-paste dari sumber lain, atau karena memang belum diisi.
Menghapusnya secara manual tentu merepotkan, apalagi jika jumlah barisnya banyak. Belum lagi jika kamu juga perlu membersihkan teks tertentu yang muncul berulang kali. Misalnya, kamu ingin menghapus kata “Contoh” dari semua sel di kolom A.
Dengan VBA, kita bisa mengotomatisasi kedua proses ini dalam hitungan detik!
Fungsi Ganda: Menghapus Baris Kosong dan Teks Tertentu
Sebagai contoh, saya baru saja copy data dari sebuah web, yang hasilnya berantakan seperti berikut:
Karena banyak sel kosong dan kalimat berulang, maka saya ingin menghapus baris kosong di Excel dan juga sel yang mengandung kalimat “Search Results” yang saya tulis di sel B1. Dan untuk keperluan tersebut, berikut adalah skrip VBA yang bisa digunakan untuk menghapus baris kosong di Excel tersebut secara cepat:
Sub HapusBarisKosongDanTeksTertentu()
Dim ws As Worksheet
Dim i As Long
Dim teksDihapus As String
Set ws = ThisWorkbook.Sheets("Sheet1") ' Ganti jika sheet kamu bukan "Sheet1"
teksDihapus = ws.Range("B1").Value
' Langkah 1: Hapus teks tertentu dari sel A1:A200
For i = 1 To 200
With ws.Cells(i, 1)
If .Value <> "" Then
.Value = Replace(.Value, teksDihapus, "")
End If
End With
Next i
' Langkah 2: Hapus baris kosong di kolom A (dari bawah ke atas)
For i = 200 To 1 Step -1
If Trim(ws.Cells(i, 1).Value) = "" Then
ws.Rows(i).Delete
End If
Next i
MsgBox "Teks '" & teksDihapus & "' dihapus, dan baris kosong sudah dibersihkan!", vbInformation
End Sub
Berikut penampakannya dalam editor VBA:
Langkah-Langkah Memasukkan Kode VBA ke Excel
Untuk kamu yang baru pertama kali mencoba VBA, tenang saja! Ikuti langkah-langkah mudah berikut ini:
- Buka Excel dan buka file tempat kamu ingin membersihkan data.
- Tekan tombol
Alt
+F11
untuk membuka Editor VBA. - Di menu kiri, klik dua kali
ThisWorkbook
atau klik kanan pada nama file > Insert > Module. - Salin dan tempel kode VBA di atas ke jendela modul yang terbuka.
- Tutup jendela VBA dan kembali ke Excel.
- Tekan
Alt
+F8
, pilihHapusBarisKosongDanTeksTertentu
, lalu klik Run.
Dan berikut adalah hasilnya:
Dan jika kita run sekali lagi untuk menghapus kalimat lainnya yang juga berulang seperti kalimat “Generate Content with AI” maka tinggal masukkan kalimat “Generate Content with AI” tersebut ke sel B1 dan Run. Berikut hasilnya:
Cara Menggunakannya
- Masukkan teks yang ingin kamu hapus ke dalam sel
B1
(misalnya “Generate Content with AI”). - Pastikan data yang ingin dibersihkan ada di range
A1:A200
. - Jalankan makro seperti langkah di atas.
- VBA akan menghapus semua kemunculan kata yang sesuai dengan isi sel
B1
di kolom A, lalu menghapus semua baris kosong dari kolom tersebut.
Manfaat Utama Menggunakan VBA untuk Menghapus Baris Kosong di Excel
Ada banyak keuntungan menggunakan VBA untuk menghapus baris kosong di Excel, antara lain:
- Menghemat waktu — kamu tidak perlu lagi scroll dan delete satu per satu.
- Akurasi tinggi — baris kosong yang sering tidak terlihat akan terhapus sempurna.
- Skalabilitas — kamu bisa mengubah range A1:A200 ke A1:A1000 atau lebih dengan mudah.
- Kustomisasi — kamu bisa menggabungkan logika lain, seperti menghapus teks tertentu, mengganti kata, atau menyimpan log penghapusan.
Kesimpulan
Dengan satu script VBA sederhana, kamu bisa menyelesaikan dua pekerjaan sekaligus: menghapus baris kosong di Excel dan menghapus teks tertentu dari range tertentu. Ini sangat membantu kamu yang sering bekerja dengan data panjang dan ingin hasil yang bersih, rapi, dan profesional.
Cobalah sekarang juga dan rasakan kemudahan otomasi Excel di ujung jarimu!
Kalau kamu ingin versi yang lebih canggih lagi (misalnya dengan tombol atau opsi satuan teks sensitif huruf besar/kecil), tinggalkan komentar atau hubungi saya untuk update selanjutnya!
Download Template Gratis
Bagi Anda yang ingin mencoba teknik ini secara langsung, kami telah menyiapkan template gratis yang dirancang khusus untuk membantu Anda mempaktikkan Solusi Praktis Menghapus Baris Kosong di Excel Sekaligus Menghapus Teks Tertentu dengan VBA ini. File Excel bisa didownload melalui tautan berikut:
Atau juga jika ingin mempelajari langkah demi langkah secara visual, bisa kunjungi Youtube Channel Depot Excel. Di sana teman-teman akan melihat bagaimana rumusnya bekerja. Semoga bermanfaat!
0 Komentar