Kalau mau bersih juga (kriteria diinput kata kuncinya) bisa pake contoh macro Auto Filter --> macro hasil modifikasi dari buku database (lupa judul dan pengarangnya).
Database Penjualan Peralatan Kantor Salesman Tanggal Nama barang Jumlah Harga Total Firman 03/01/2010 Pita Mesin Tik 1 8,000 8,000 Dinu 04/01/2010 Pita Mesin Tik Elektrik 2 25,000 50,000 Citra 07/01/2010 Pita Mesin Tik 5 8,000 40,000 Citra 08/01/2010 Pita Mesin Absensi 5 75,000 375,000 Citra 10/01/2010 Pita Mesin Tik Elektrik 5 25,000 125,000 Wulan 10/01/2010 Pita Printer 2 27,500 55,000 Wulan 12/01/2010 Pita Mesin Tik 3 8,000 24,000 Firman 15/01/2010 Pita Mesin Tik Elektrik 5 25,000 125,000 Agus 16/01/2010 Pita Mesin Tik 5 8,000 40,000 Dinu 17/01/2010 Pita Mesin Tik Elektrik 4 25,000 100,000 Agus 18/01/2010 Pita Printer 3 27,500 82,500 Agus 21/01/2010 Pita Printer 2 27,500 55,000 Dinu 22/01/2010 Pita Mesin Tik Elektrik 5 25,000 125,000 Wulan 23/01/2010 Pita Printer 2 27,500 55,000 Firman 24/01/2010 Pita Printer 3 27,500 82,500 Macronya Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim Krit As String Krit = InputBox("Masukkan Kata Kunci untuk Filter", "Filter berdasarkan Kata Kunci Nama Barang") If ActiveSheet.FilterMode Then ActiveSheet.ShowAllData End If Range("Tabel").AutoFilter field:=3, Criteria1:="*" & Krit & "*" Cancel = True End Sub Kata kuncinya "Pita" File tidak diattach karena over size Salam, HK ----- Forwarded Message ----- From: Mr. Kid <mr.nm...@gmail.com> To: BeExcel <belajar-excel@yahoogroups.com> Sent: Tuesday, 2 July 2013, 16:04 Subject: Re: [belajar-excel] Macro : Advanced Filter 1. Pertanyaan saya apakah bisa criteria diganti variable memory ? >> tidak bisa, karena dari pembuat fungsi AdvancedFilter ditetakan bahwa >> criteriarange berupa range berisi kriteria, meskipun tipe input parameternya >> menggunakan tipe data variant yang bisa menerima array. 2. Sehingga lembar kerja bersih, hanya muncul hasil filer aja. >> letakkan tabel kriteria di sheet lainnya (bukan di sheet output) juga bisa >> membuat sheet output hanya menampilkan hasil filternya *** bisa dengan opsi xlfiltercopy juga loh >> buat tabel kriteria, isi tabelnya, lakukan advanced filter, kemudian hapus >> tabel kriterianya juga bisa membuat sheet output hanya menampilkan hasil >> filternya saja. Wassalam, Kid. 2013/7/2 Heru Safrudin <superhe...@gmail.com> > >Dear Master, > >Saya biasa menggunakan macro Advanced Filter untuk masalah filtering data, >Salah satu syarat yang harus dipenuhi dalam advanced filter adalah harus ada criteria, >Sedangkan criteria harus diletakkan di dalam cell tertentu >Pertanyaan saya apakah bisa criteria diganti variable memory ? >Sehingga lembar kerja bersih, hanya muncul hasil filer aja. > >Semoga para master bisa memberi pencerahan > >Terima kasih > > >