Hai Haris, Macro bekerja karena ada pemicunya... Pemicunya dalam hal ini adalah CTRL SHIFT Z... Mentukan Range (baik diselect atau secara otomatis) dilakukan melalui penekanan tombol CTRL SHIFT Z
Jika Rangenya mau dibuat secara otomatis maka titik awalnya harus jelas (mis. Range A2) dan titik akhirnya bisa disesuaikan dengan data terakhir (mungkin ini yang anda maksud "otomatis juga berubah tanpa disentuh"). Jika itu yang diinginkan maka tambahkan perintah ini: Range("A2:A" & Range("A65000").End(xlUp).Row).Select sebelum Set D = Selection batas bawah A65000 dibuat dengan asumsi user menggunakan Excel 2003. Mudah2an penjelasan singkat ini cukup jelas. Salam, HK On Friday, 5 September 2014, 14:07, "ris ha har1sn.ex...@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote: To Mr. Kid Waduh, kayaknya cukup membebani kinerja komputer y? kl begitu tak biarkan saja deh. Setelah saya coba utk ditampilkan dengan sheet lainnya ternyata bisa pake IFERROR. Makasih banget atas ilmu jariyahnya nih. To pak Hendrik Ctrl Shift Z nya luar biasa pak. Tapi masih terkendala updating data yg selalu berubah2. harapannya secara otomatis juga berubah tanpa disentuh. Terima kasih semua pada para master nih. Sukses selalu Salam Haris On Thursday, September 4, 2014 2:34 PM, "'Mr. Kid' mr.nm...@gmail.com [belajar-excel]" <belajar-excel@yahoogroups.com> wrote: Ganti formula penggunaan LOUV jangan menjadi array block. Cara : 1. hapus formula di kolom hasil (asumsi baris 1 header hasil dan record hasil pertama di baris 2, kolomnya bebas) 2. klik cell baris ke-2 (1 cell saja) 3. tulis formula : (sesuaikan rujukan range datanya) =IFError( Index( LOUV( range_datanya_minimal_absolute_reference_baris ), row()-1 ) , "" ) *** jika regional setting komputer setempat adalah Indonesian, ganti karakter koma dengan titik koma. 4. copy formula ke baris berikutnya di kolom hasil (sesukanya atau sekuatnya komputer atau sesabarnya user menunggu kalkulasi) Wassalam, Kid. 2014-09-04 14:18 GMT+10:00 Hendrik Karnadi hendrikkarn...@yahoo.com [belajar-excel] <belajar-excel@yahoogroups.com>: > >Saya cuma nerusin pak. Yang punya ga bisa dihubungi lagi..terpaksa minta >bantuan Mr. Kid atau pakar lainnya. > > >Salam, >HK > > >Sent from Samsung Mobile > > >-------- Original message -------- >From: "ris ha har1sn.ex...@yahoo.com [belajar-excel]" >Date:04/09/2014 09:45 (GMT+07:00) >To: belajar-excel@yahoogroups.com >Subject: Re: [belajar-excel] menghilangkan blank cell dan menurutkan data text >[1 Attachment] > > >Maaf file gambarnya ketinggalan > > >Macro dari pak Hendrik Luar Biasa, hanya saja, tatkala tidak ada datanya terjadi error, seperti pada gambar (maaf susah njelasinnya, jadi pake gambar aja). Setelah pake IFERROR tetap tidak jadi, bagaimana ya jika #N/A tidak tampil ato dihilangkan? Maaf mau utak atik macronya ga paham Makasih > > > > > > >On Thursday, September 4, 2014 9:34 AM, ris ha <har1sn.ex...@yahoo.com> wrote: > > > >Macro dari pak Hendrik Luar Biasa, hanya saja, tatkala tidak ada datanya >terjadi error, seperti pada gambar (maaf susah njelasinnya, jadi pake gambar >aja). Setelah pake IFERROR tetap tidak jadi, bagaimana ya jika #N/A tidak >tampil ato dihilangkan? Maaf mau utak atik macronya ga paham Makasih > > > > >On Wednesday, September 3, 2014 3:48 PM, "hendrik karnadi >hendrikkarn...@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> >wrote: > > > > >Hasilnya seperti file terlampir. > > >Salam, >HK > > > > > > >On Wednesday, 3 September 2014, 15:01, "Hendrik Karnadi >hendrikkarn...@yahoo.com [belajar-excel]" <belajar-excel@yahoogroups.com> >wrote: > > > > >Kalau susunan datanya tidak urut ...terpaksa pakai UDF nya mbak Siti (LOUV >kependekan dari List Of Unique Values). >Masalahnya, jika baris yg disorot berlebih maka akan keluar #N/A. > > >Salam, >HK > > > > > > >Sent from Samsung Mobile > > >-------- Original message -------- >From: "'Bagus' ba...@kingjim.co.id [belajar-excel]" >Date:03/09/2014 14:54 (GMT+07:00) >To: belajar-excel@yahoogroups.com >Subject: Re: [belajar-excel] menghilangkan blank cell dan menurutkan data text > > > >Wa'alaykum salam warohmatullohi wabarokatuhu.. > >Coba begini pada B2, (Array formula ya): >=IFERROR(INDEX($A$2:$A$12,MATCH(SUM(COUNTIF($A$2:$A$12,B$1:B1)),COUNTIF($A$2:$A$12,"<"&$A$2:$A$12),0)),"") > >akhiri dengan CSE > >Copas kebawah > > >Wassalam >~ Bagus ~ > >----- Original Message ----- >>From: ris ha har1sn.ex...@yahoo.com [belajar-excel] >>To: belajar-excel@yahoogroups.com >>Sent: Wednesday, September 03, 2014 11:14 AM >>Subject: [belajar-excel] menghilangkan blank cell dan menurutkan data text >>[1 Attachment] >> >> >>Assalamu'alaikum. para master excel >> >> >> >>Mohon saya dibantu lagi. >> >>Bagaimanaformulanya untuk menghilangkan cell blanks dan mengurutkan data text >>seperti pada contoh terlampir >> >> >>Terima kasih. >> >> > > > > > >