Vba: cara menggunakan "berbeda dari" di autofilter

Anda dapat menggunakan simbol <> untuk mewakili “tidak sama dengan” dalam filter otomatis di VBA.

Berikut adalah cara umum untuk melakukan hal ini dalam praktik:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center "

End Sub

Makro khusus ini akan memfilter semua baris dalam rentang A1:C11 di mana nilai kolom kedua tidak sama dengan “Tengah”.

Contoh berikut menunjukkan cara menggunakan sintaksis ini dalam praktiknya.

Contoh: Gunakan “Berbeda Dari” di Filter Otomatis di VBA

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

Katakanlah kita ingin memfilter kumpulan data untuk hanya menampilkan baris yang nilainya di kolom Posisi tidak sama dengan “Tengah”.

Kita dapat membuat makro berikut untuk melakukan ini:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center "

End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Perhatikan bahwa kumpulan data telah difilter untuk hanya menampilkan baris yang nilainya di kolom Posisi tidak sama dengan “Pusat”.

Perhatikan bahwa Anda juga dapat memfilter baris yang nilai kolom Posisinya tidak sama dengan lebih dari satu nilai.

Misalnya, Anda bisa membuat makro berikut untuk memfilter himpunan data agar hanya menampilkan baris yang nilainya di kolom Posisi tidak sama dengan “Tengah” atau “Penjaga”:

 SubFilterNotEqualTo ()

Range(" A1:C11 ").AutoFilter Field:=2, Criteria1:=" <>Center ", Criteria2:=" <>Guard "

End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Saya perhatikan bahwa kumpulan data difilter untuk hanya menampilkan baris yang nilainya di kolom Posisi tidak sama dengan “Tengah” atau “Penjaga”:

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

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menggunakan autofilter dengan banyak kriteria
VBA: Cara memfilter tabel pivot
VBA: Cara menghapus filter