Cara memfilter kolom menggunakan vba (dengan contoh)
Anda bisa menggunakan metode berikut untuk memfilter menurut kolom di Excel menggunakan VBA:
Metode 1: Filter berdasarkan nilai kolom
SubFilterRows ()
ActiveSheet.Range(" A1:C11 ").AutoFilter field:=1, Criteria1:=Range(" F2 ").Value
End Sub
Makro khusus ini akan memfilter rentang A1:C11 untuk memperlihatkan hanya baris yang kolom pertamanya sama dengan nilai sel F2 .
Metode 2: Filter berdasarkan beberapa nilai kolom
SubFilterRows ()
ActiveSheet.Range(" A1:C11 ").AutoFilter field:=1, Criteria1:=Range(" F2 ").Value, _
Operator:=xlOr, Criteria2:=Range(" F3 ").Value
End Sub
Makro khusus ini akan memfilter rentang A1:C11 untuk memperlihatkan hanya baris yang kolom pertamanya sama dengan nilai sel F2 atau F3 .
Metode 3: Hapus Filter
SubClearFilters ()
ActiveSheet.AutoFilterMode = False
End Sub
Makro khusus ini akan menghapus semua filter dari sheet saat ini.
Contoh berikut menunjukkan cara menggunakan masing-masing metode ini dalam praktik.
Contoh 1: Filter berdasarkan nilai kolom
Misalkan kita mempunyai kumpulan data yang berisi informasi tentang berbagai pemain bola basket dan kita ingin memfilter kumpulan data tersebut agar hanya berisi baris yang nilainya di kolom Tim sama dengan A:
Kita dapat membuat makro berikut untuk melakukan ini:
SubFilterRows ()
ActiveSheet.Range(" A1:C11 ").AutoFilter field:=1, Criteria1:=Range(" F2 ").Value
End Sub
Saat kita menjalankan makro ini, dataset akan otomatis difilter agar hanya berisi baris yang nilainya di kolom Tim sama dengan A:
Contoh 2: Filter berdasarkan beberapa nilai kolom
Katakanlah kita ingin memfilter kumpulan data agar hanya berisi baris yang nilainya di kolom Tim sama dengan A atau C:
Kita dapat membuat makro berikut untuk melakukan ini:
SubFilterRows ()
ActiveSheet.Range(" A1:C11 ").AutoFilter field:=1, Criteria1:=Range(" F2 ").Value, _
Operator:=xlOr, Criteria2:=Range(" F3 ").Value
End Sub
Saat kita menjalankan makro ini, kumpulan data secara otomatis difilter untuk menampilkan hanya baris yang nilainya di kolom Tim sama dengan A atau C.
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 menyegarkan tabel pivot
VBA: Cara memfilter tabel pivot
VBA: cara menghapus nilai duplikat