Bagaimana cara menghapus seluruh kolom berdasarkan nilai header di Excel?
Dalam banyak kasus, Anda mungkin perlu menghapus seluruh kolom berdasarkan nilai header di Excel. Misalnya, Anda perlu menghapus semua kolom yang berisi nilai "lama" di header. Dalam tutorial ini, kami akan menunjukkan kepada Anda metode untuk menghapus seluruh kolom berdasarkan nilai header secara detail.
Hapus seluruh kolom berdasarkan nilai header dengan kode VBA
Hapus seluruh kolom berdasarkan nilai header dengan Kutools for Excel
Hapus seluruh kolom berdasarkan nilai header dengan kode VBA
Anda dapat menghapus seluruh kolom berdasarkan nilai header dengan kode VBA. Silakan lakukan sebagai berikut.
1. tekan lain + F11 tombol secara bersamaan untuk membuka Aplikasi Microsoft Visual Basic jendela.
2. Dalam Aplikasi Microsoft Visual Basic window, klik Menyisipkan > Modul. Dan kemudian salin dan tempel kode di bawah ini ke jendela Modul.
Kode VBA: hapus seluruh kolom berdasarkan nilai header
Sub DeleteSpecifcColumn()
Set MR = Range("A1:D1")
For Each cell In MR
If cell.Value = "old" Then cell.EntireColumn.Delete
Next
End Sub
Catatan:
3. tekan F5 kunci untuk menjalankan kode, seluruh kolom dengan header sama dengan teks yang ditentukan akan segera dihapus.
Hapus seluruh kolom berdasarkan nilai header dengan Kutools for Excel
Dengan Kutools untuk Excel'S Pilih Sel Spesifik utilitas, Anda dapat dengan mudah memilih semua kolom yang berisi nilai tajuk tertentu terlebih dahulu, lalu menghapus kolom yang dipilih ini sekaligus. Silakan lakukan sebagai berikut.
Sebelum melamar Kutools untuk Excel, Mohon unduh dan instal terlebih dahulu.
1. Pilih rentang yang berisi kolom yang perlu Anda hapus, lalu klik Kutools > Pilih > Pilih Sel Spesifik. Lihat tangkapan layar:
2. Dalam Pilih Sel Spesifik kotak dialog, pilih Seluruh kolom pilihan dalam Tipe pilihan bagian, dan di Tipe khusus daftar drop-down, pilih sama opsi, lalu ketik nilai header di kotak berikut ini. Dan terakhir klik OK tombol. Lihat tangkapan layar:
3. Klik OK tombol di kotak dialog popping up lain, kemudian kolom yang berisi nilai header tertentu dipilih segera.
4. Klik kanan tajuk kolom dari kolom yang dipilih, lalu klik Delete dari menu klik kanan. Kemudian semua kolom yang dipilih dihapus sekaligus.
Jika Anda ingin memiliki uji coba gratis (30 hari) dari utilitas ini, silahkan klik untuk mendownloadnya, lalu lanjutkan untuk menerapkan operasi sesuai langkah di atas.
Alat Produktivitas Kantor Terbaik
Tingkatkan Keterampilan Excel Anda dengan Kutools for Excel, dan Rasakan Efisiensi yang Belum Pernah Ada Sebelumnya. Kutools for Excel Menawarkan Lebih dari 300 Fitur Lanjutan untuk Meningkatkan Produktivitas dan Menghemat Waktu. Klik Di Sini untuk Mendapatkan Fitur yang Paling Anda Butuhkan...
Tab Office Membawa antarmuka Tab ke Office, dan Membuat Pekerjaan Anda Jauh Lebih Mudah
- Aktifkan pengeditan dan pembacaan tab di Word, Excel, PowerPoint, Publisher, Access, Visio, dan Project.
- Buka dan buat banyak dokumen di tab baru di jendela yang sama, bukan di jendela baru.
- Meningkatkan produktivitas Anda sebesar 50%, dan mengurangi ratusan klik mouse untuk Anda setiap hari!