Kalau begitu, bisa dilakukan record macro dengan cara : 1. aktifkan autofilter di sumber data 2. jalankan record macro 3. turn off autofilter di data 4. turn on autofilter di data 5. filter kolom dimaksud 6. blok range data hasil filter beserta 1 baris kosong dibawah hasil filter 7. CTRL G -> klik Special -> pilih visible cells only -> OK 8. CTRL (copy) 9. ke sheet hasil 10. klik cells a1 11. tekan CTRL G -> tulis cells A1000000 -> OK (ke cells kosong yang jauh di bawah sana) 12. tekan CTRL panah ke atas di keyboard (sampai record terakhir tabel hasil) 13. tekan panah ke bawah 1 kali saja (supaya pindah ke cells kosong pertama dibawah record data hasil) 14. klik kanan pilih paste special -> pilih values and number format -> OK 15. kembali ke sheet sumber data 16. turn off auto filter 17. stop record macro > sudah jadi
Kalau ingin sekalian menghilagkan duplicate di tabel hasil, maka kolom kriteria filter diikut sertakan saat proses copy, sebagai alat sort nantinya. Jadi, nomor 6 : blok range data hasil filter beserta 1 baris kosong dibawah hasil filter (termasuk kolom yang difilter) dari nomor 14 sampai dengan 15 menjadi begini : 14. klik kanan pilih paste special -> pilih values and number format -> OK 14a. ke cells a1, aktifkan autofilter di tabel hasil, sort kolom terkanan secara descending 14b. lakukan remove duplicate berdasar seluruh kolom selain kolom terkanan 14c. buang kolom terkanan (delete column) 15. kembali ke sheet sumber data Regards, Kid On Thu, Mar 28, 2019 at 7:55 PM Cari Kebenaran cahayailm...@gmail.com [belajar-excel] <belajar-excel@yahoogroups.com> wrote: > > > Terima kasih atas tanggapan master. > > Kalau secara manual, saya menggunakan filter. Klik di cell A6 pada sheet > DATA. Lalu klik Tab Menu "Data", lalu pilih "Filter". Di sub menu filter > ini saya pilih "LULUS" sebagai fileternya. Maka hanya baris yang > mengandung kata filter saja yang tampil. Selanjutnya saya pilih semua kolom > kecuali kolom terakhir (kolom E). Kemudian copy dan paste value ke sheet > KET. > > Begitulah yang saya lakukan secara manual. > > Terima kasih > > >