Daftar Isi
Artikel ini akan menunjukkan kepada Anda bagaimana Anda dapat menghapus kolom kosong di Excel dengan tiga cara yang efektif dan mudah.
Unduh Buku Kerja
Anda bisa mengunduh buku kerja latihan dari sini.
Hapus-Kolom-Kosong-dalam-Excel.xlsm3 Cara Sederhana untuk Menghapus Kolom Kosong di Excel
Di sini Anda akan mempelajari 3 cara untuk menghapus kolom kosong di Excel dengan menggunakan alat pengeditan Excel, dengan menggunakan rumus, dan dengan menerapkan kode VBA.
1. Dengan Menggunakan Alat Pengeditan Excel
Langkah 1: Pilih dataset.
Langkah 2: Pergi ke Rumah -> Temukan &; Pilih -> Pergi ke Khusus .
Langkah 3: Dari Pergi ke Khusus jendela pop-up, pilih Kosong , lalu klik OK .
Langkah 4: Hanya sel kosong dari dataset Anda yang akan dipilih. Klik kanan mouse, dari daftar opsi pop-up, pilih Hapus .
Langkah 5: Berikutnya, dari pop-up Hapus kotak, pilih Menggeser sel ke kiri dari opsi. Klik BAIKLAH.
Ini akan menghapus semua kolom kosong dari dataset.
Baca selengkapnya: Cara Menghapus Kolom yang Tidak Digunakan di Excel
2. Dengan Menggunakan Formula
Anda bisa memanfaatkan COUNTA() rumus untuk menghapus kolom kosong di Excel. Apa COUNTA() rumus yang akan dilakukan adalah, pertama-tama akan mengidentifikasi kolom kosong dan tidak kosong di kumpulan data Anda di Excel, dan kemudian, dari sana Anda dapat dengan mudah memilih dan menghapus kolom kosong.
Ini adalah cara efisien lain untuk menghapus kolom kosong di Excel, terutama saat Anda memiliki banyak kolom kosong untuk dikerjakan. Mari pelajari cara melakukannya.
Langkah 1: Sisipkan baris kosong tepat di atas dataset dengan mengklik kanan header baris pertama dan memilih Sisipkan Ini akan menyisipkan baris baru di atas seluruh dataset.
Langkah 2: Di cell paling kiri lembar kerjamu, tuliskan rumus berikut,
=COUNTA(A2:A1048576)=0
Di sini,
A2 mewakili sel pertama dari dataset,
A1048576 mewakili baris maksimum di Excel (2007-2019).
Langkah 3: Tekan Masuk Ini akan menampilkan Benar jika kolom kosong, atau Salah jika setidaknya ada satu sel yang tidak kosong di seluruh kolom.
Langkah 4: Terapkan rumus ke kolom lain dengan menyeret Isi Gagang .
Langkah 5: Sekarang pergi ke Rumah -> Urutkan &; Saring -> Sortir Khusus .
Langkah 6: Dari pop-up Sortir jendela, klik tombol Opsi Kemudian pilih Urutkan dari kiri ke kanan dari Opsi Penyortiran jendela pop-up dan klik OK .
Langkah 7: Klik kotak drop-down di samping Urutkan berdasarkan dan dari sana pilih opsi Baris 1 .
Langkah 8: Klik kotak drop-down di bawah Urutkan label dan pilih opsi Nilai Sel dari sana.
Langkah 9: Klik kotak drop-down di bawah Pesanan label dan pilih opsi Terbesar ke Terkecil . klik OK .
Ini akan menggeser semua kolom kosong ke sisi kiri lembar kerja.
Langkah 10: Dari sana, pilih saja seluruh kumpulan data kolom kosong yang kosong, klik kanan, lalu pilih Hapus .
Langkah 11: Dari pop-up Hapus kotak, pilih Seluruh kolom dari opsi. Klik OK .
Ini akan menghapus semua kolom kosong dari dataset.
Bacaan serupa:
- Cara Menghapus Beberapa Kolom di Excel
- Hapus Kolom Duplikat di Excel (6 Cara)
- Cara Menghapus Kolom Ekstra di Excel (7 Metode)
- Hapus Kolom di Excel Tanpa Mempengaruhi Formula (Dua Cara)
3. Dengan Menggunakan Kode VBA
Jika Anda adalah pengguna Excel yang berpengalaman maka metode ini khusus untuk Anda. Menerapkan kode VBA adalah cara teraman untuk menghapus kolom kosong di Excel. Ini hanya menghapus kolom yang benar-benar kosong. Jika ada kolom yang berisi nilai sel tunggal, bahkan sel apa pun mengembalikan string kosong, seluruh kolom itu akan tetap utuh.
Di bawah ini adalah cara otomatis menghapus kolom kosong di Excel.
Langkah 1: Tekan Alt + F11 pada keyboard Anda atau buka tab Pengembang -> Visual Basic untuk membuka Visual Basic Editor.
Langkah 2: Dari bilah menu, klik Sisipkan -> Modul .
Langkah 3: Salin kode berikut ini dan tempelkan ke jendela kode.
Public Sub DeleteBlankColumns() Dim SrcRange As Range Dim EntrColumn As Range On Error Resume Next Set SrcRange = Application.InputBox( _ "Select a range:", "Delete Blank Columns", _ Application.Selection.Address, Type:=8) If Not (SrcRange Is Nothing) Then Application.ScreenUpdating = False For i = SrcRange.Columns.Count To 1 Step -1 Set EntrColumn = SrcRange.Cells(1, i).EntrColumn IfApplication.WorksheetFunction.CountA(EntrColumn) = 0 Then EntrColumn.Delete End If Next Application.ScreenUpdating = True End If End Sub Langkah 4: Tekan F5 pada keyboard Anda atau dari bilah menu pilih Lari -> Jalankan Sub/UserForm Anda juga bisa mengklik pada gambar kecil Ikon bermain di bilah sub-menu untuk menjalankan makro.
Langkah 5: Dari kotak dialog pop-up, alihkan ke lembar kerja yang diinginkan, pilih rentang yang diinginkan dan klik OK .
Ini akan menghapus semua kolom kosong dari datase t.
Kesimpulan
Artikel ini membahas tiga cara mudah tentang cara menghapus kolom kosong di Excel. Kami telah menunjukkan cara menggunakan alat pengeditan Excel untuk menghapus kolom kosong, kami telah menunjukkan cara menerapkan rumus untuk menghapus kolom kosong dan kami juga telah menerapkan kode VBA untuk menghapus kolom kosong di Excel.
