Kolom Hapus VBA

Biasanya di lembar kerja Excel, kami memiliki dua metode berbeda untuk menghapus kolom: pintasan keyboard dan metode klik kanan dan sisipkan. Namun, di VBA, kita harus menggunakan perintah “Hapus” dan seluruh pernyataan kolom untuk menghapus kolom apa pun secara bersamaan. Jika kami perlu menghapus satu kolom, kami memberikan referensi satu kolom, tetapi kami memberikan referensi banyak kolom untuk banyak kolom.

Kolom Hapus VBA Excel

Kami melakukan banyak tindakan di Excel seperti memotong, menyalin, menempel, menambah, menghapus, dan menyisipkan secara teratur. Kita dapat menggunakan semua tindakan ini menggunakan pengkodean VBA. Namun, salah satu konsep penting yang perlu kita pelajari di VBA adalah “menghapus kolom”. Artikel ini akan menunjukkan cara menggunakan opsi “Hapus Kolom” ini di VBA.

Apa yang Dilakukan Hapus Kolom di Excel VBA?

Seperti namanya, itu akan menghapus kolom yang ditentukan. Untuk melakukan tugas ini, pertama-tama kita harus mengidentifikasi kolom mana yang akan dihapus. Pemilihan kolom yang dihapus berbeda dari satu skenario ke skenario lainnya, sehingga kami akan membahas beberapa skenario penting dan sering dihadapi dalam artikel ini.

Menghapus kolom itu mudah. Pertama, kita perlu menggunakan properti COLUMNS untuk memilih kolom, jadi sintaks VBA untuk metode “Hapus Kolom” ada di bawah.

Kolom (Kolom Referensi).Hapus

Jadi, kita dapat membuat kode seperti ini:

Kolom (2).Hapus atau Kolom (‘B’).Hapus

Ini akan menghapus kolom nomor 2, yaitu kolom B.

Jika kami ingin menghapus banyak kolom, kami tidak dapat memasukkan kolom. Sebagai gantinya, kita perlu mereferensikan kolom dengan tajuk kolom, yaitu abjad.

Kolom (‘A:D’).Hapus

Ini akan menghapus kolom dari A ke D, yaitu 4 kolom pertama.

Seperti ini, kita dapat menggunakan metode “Hapus Kolom” di VBA untuk menghapus kolom tertentu. Pada bagian di bawah ini, kita akan melihat lebih banyak contoh untuk memahaminya dengan lebih baik. Baca terus.

Anda bebas menggunakan gambar ini di situs web Anda, templat, dll., Harap berikan kami tautan atribusiBagaimana Memberikan Atribusi? Tautan Artikel untuk Di-Hyperlink
Misalnya: Sumber: Kolom Hapus V BA (wallstreetmojo.com)

Contoh Metode Hapus Kolom Excel VBA

Di bawah ini adalah contoh menghapus kolom menggunakan VBA.

Contoh #1 – Menggunakan Metode Hapus

Asumsikan Anda memiliki lembar data, seperti di bawah ini.

Jika kita ingin menghapus bulan “Mar”, pertama-tama pilih properti kolom.

Kode:

Sub Delete_Example1() Kolom (End Sub

Sebutkan nomor kolom atau alfabet. Dalam hal ini, itu adalah 3 atau C.

Kode:

Sub Delete_Example1() Kolom(3). Akhir Sub

Gunakan metode Hapus.

Catatan: Anda tidak akan mendapatkan daftar IntelliSense untuk memilih metode Hapus. Cukup ketik “Hapus.”

Kode:

Sub Hapus_Contoh1() Kolom(3).Hapus Akhir Sub

Atau Anda dapat memasukkan alamat kolom seperti ini.

Kode:

Sub Delete_Example1() Columns(“C”).Hapus End Sub

Jalankan kode ini menggunakan tombol F5, atau Anda dapat menjalankannya secara manual dan lihat hasilnya.

Kedua kode akan melakukan pekerjaan yang sama untuk menghapus kolom yang disebutkan.

Jika kami ingin menghapus banyak kolom, kami perlu menyebutkannya dalam alfabet. Kami tidak dapat menggunakan nomor kolom di sini.

Jika kita ingin menghapus kolom 2 sampai 4, kita bisa memberikan kode seperti di bawah ini.

Kode:

Sub Delete_Example1() Columns(“C:D”).Hapus End Sub

Jalankan kode ini secara manual melalui opsi jalankan atau tekan tombol F5. Ini akan menghapus kolom “Feb”, “Mar”, dan “Apr”.

Contoh #2 – Hapus Kolom dengan Nama Lembar Kerja

Di atas adalah ikhtisar tentang cara menghapus kolom menggunakan kode VBA. Namun, itu bukan praktik yang baik untuk menghapus kolom. Menghapus kolom tanpa mengacu pada nama worksheet itu berbahaya.

Jika Anda belum menyebutkan nama worksheet, maka sheet mana pun yang aktif akan menghapus kolom dari sheet tersebut.

Pertama, kita perlu memilih lembar kerja dengan namanya.

Kode:

Sub Delete_Example2() Worksheets(“Sales Sheet”). Pilih End Sub

Setelah memilih lembar, kita perlu memilih kolom. Kita juga dapat memilih kolom dengan menggunakan objek VBA RANGEMenggunakan VBA RANGE ObjectRange adalah properti di VBA yang membantu menentukan sel tertentu, rentang sel, baris, kolom, atau rentang tiga dimensi. Dalam konteks lembar kerja Excel, objek rentang VBA menyertakan sel tunggal atau beberapa sel yang tersebar di berbagai baris dan kolom.baca lebih lanjut.

Kode:

Sub Delete_Example2() Worksheets(“Sales Sheet”).Select Range(“B:D”).Delete End Sub

Ini akan menghapus kolom B ke D dari lembar kerja “Lembar Penjualan.” Untuk kode ini, tidak masalah mana yang aktif. Tetap saja, itu hanya akan menghapus kolom yang disebutkan dari sheet itu.

Kita dapat membuat kode VBA Kode VBA Kode VBA mengacu pada serangkaian instruksi yang ditulis oleh pengguna dalam bahasa pemrograman Aplikasi Visual Basic pada Editor Visual Basic (VBE) untuk melakukan tugas tertentu.Baca lebih lanjut dalam satu baris itu sendiri.

Kode:

Sub Delete_Example2() Worksheets(“Sales Sheet”).Range(“B:D”).Delete End Sub

Itu juga menghapus kolom “B ke D” tanpa memilih lembar kerja “Lembar Penjualan.”

Contoh #3 – Hapus Kolom Kosong

Asumsikan Anda memiliki data yang memiliki kolom kosong alternatif seperti di bawah ini.

Jadi, hapus setiap kolom alternatif. Kemudian, kita dapat menggunakan kode di bawah ini.

Kode:

Sub Delete_Example3() Dim k Sebagai Integer Untuk k = 1 Sampai 4 Kolom(k + 1).Hapus Selanjutnya k End Sub

Jalankan kode ini menggunakan tombol F5 atau secara manual. Kemudian, itu akan menghapus semua kolom kosong alternatif, dan data kita akan terlihat seperti ini.

Catatan: Ini hanya berfungsi untuk kolom kosong alternatif.

Contoh #4 – Hapus Kolom Sel Kosong

Sekarang, lihat contoh ini. Dalam situasi tertentu, kita perlu menghapus seluruh kolom jika kita menemukan sel kosong dalam rentang data. Pertimbangkan data di bawah ini sebagai contoh.

Semua sel berwarna kuning kosong. Jadi di sini, kami harus menghapus semua kolom sel kosong. Kode di bawah ini akan melakukannya.

Kode:

Sub Delete_Example4() Range(“A1:F9”).Select Selection.SpecialCells(xlCellTypeBlanks).Select Selection.EntireColumn.Delete End Sub

Izinkan saya menjelaskan kode ini baris demi baris untuk Anda.

Data kita dari A1 sampai F9, jadi pertama-tama kita harus memilih range tersebut. Kode di bawah ini akan melakukannya.

Range(“A1:F9”).Pilih

Kita perlu memilih sel kosong di rentang sel yang dipilih ini. Jadi, untuk memilih sel kosong, kita memerlukan properti sel khusus. Di properti itu, kami menggunakan tipe sel sebagai kosong.

Seleksi.SpecialCells(xlCellTypeBlanks).Pilih

Selanjutnya, itu akan memilih semua sel kosong, dan kami menghapus seluruh kolom pilihan dalam pemilihan.

Seleksi.SeluruhKolom.Hapus

Jadi, hasil kita akan terlihat seperti ini.

Di mana pun ia menemukan sel kosong, ia telah menghapus seluruh sel kosong itu.

Anda dapat mengunduh Kolom Hapus VBA Excel ini di sini – Templat Kolom Hapus VBA

Artikel yang Direkomendasikan

Artikel ini telah menjadi panduan untuk Kolom Hapus VBA. Di sini, kita mempelajari empat metode untuk menghapus kolom menggunakan kode VBA Excel, contoh praktis, dan kode yang dapat diunduh. Di bawah ini adalah beberapa artikel Excel berguna yang terkait dengan VBA: –