Cara menghapus filter di excel menggunakan vba (dengan contoh)

Anda dapat menggunakan sintaks berikut di VBA untuk menghapus semua filter dari lembar Excel:

 SubClearFilters ()

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

End Sub

Makro khusus ini akan menghapus semua filter dari lembar yang sedang aktif.

Makro ini bekerja dengan menggunakan metode ShowAllData untuk memaksa semua baris yang saat ini tersembunyi agar terlihat.

Jika saat ini tidak ada baris yang difilter pada lembar aktif, tidak akan terjadi apa pun saat Anda menjalankan makro ini.

Contoh berikut menunjukkan cara menggunakan makro ini dalam praktiknya.

Contoh: Hapus Semua Filter di Excel Menggunakan VBA

Katakanlah kita memiliki kumpulan data berikut di Excel yang berisi informasi tentang berbagai pemain bola basket:

Sekarang misalkan kita menambahkan filter untuk hanya menampilkan baris yang nilainya di kolom Tim sama dengan Mavs atau Nets:

Sekarang katakanlah kita ingin menghapus filter ini menggunakan VBA.

Kita dapat membuat makro berikut untuk melakukan ini:

 SubClearFilters ()

If ActiveSheet.AutoFilterMode Then ActiveSheet.ShowAllData

End Sub

Saat kita menjalankan makro ini, filter akan otomatis dihapus dari sheet:

Perhatikan bahwa semua baris yang sebelumnya tersembunyi kini terlihat kembali karena kita telah menghapus filter.

Catatan : Anda dapat menemukan dokumentasi lengkap untuk metode VBA ShowAllData di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara memfilter tabel pivot
VBA: cara menyegarkan tabel pivot
VBA: cara menghapus nilai duplikat