Hai Ridwan, With rngData :: menyimpan pointer rngdata, sehingga object tersebut dapat digunakan tanpa menuliskan lagi nama variabel objectnya. Jadi variabel object range bernama rngData akan selalu diingat dan dapat digunakan tanpa menulis rngData sampai hadirnya End With hal seperti ini akan bermanfaat ketika penggunaan variabel object tersebut sangat intensif. Pada script bawahnya, tampak bahwa penggunaan rngData sangat intensif (4 x).
.Sort Key1:=.Resize(, 1), key2:=.Offset(, 4).Resize(, 1), key3:=.Offset(, 8).Resize(, 1), Header:=xlYes Pada script di atas, ada beberapa methods yang tidak menyertakan nama variabel objectnya, misal .Sort Berarti methods sort yang digunakan adalah milik variabel rngData yang telah dirujuk oleh With. End With :: batas penggunaan pointer. Karena ada with rngData, maka end with adalah batas penggunaan pointer rngData. Sort :: methods untuk melakukan sort (dengan 3 key maksimal) Untuk xl2003, maksimal memang 3 keys. Untuk xl2007 keatas, bisa lebih dari 3 keys, maka yang digunakan bukan lagi object range, tetapi object sheets. Resize :: adalah mengatur dimensi range (jumlah baris , jumlah kolom) Offset :: adalah merujuk ke suatu lokasi range dari suatu range rujukan, berdasar jumlah baris lompat (relatif n barisnya) dan jumlah kolom lompat (relatif m kolomnya) Kedua methods ini seperti yang digunakan pada fungsi Offset. Key1,key2,key3,header :: adalah input parameter dari methods sort. Lihat di VBA Excel Help. Kid. 2011/7/25 Ridwan Rahman <[email protected]> > ** > > > Terima kasih Mr.Kid atas solusinya yg mantap**** > > Btw mau Tanya maksud dari**** > > “With rngData**** > > .Sort Key1:=.Resize(, 1), key2:=.Offset(, 4).Resize(, 1), > key3:=.Offset(, 8).Resize(, 1), Header:=xlYes”**** > > Bahasa sederhananya apa y?**** > > Mohon penjelasannya**** > > Regards**** > > Ridwan Rahman**** > > ** ** > > ** ** > > *From:* [email protected] [mailto: > [email protected]] *On Behalf Of *Mr. Kid > *Sent:* 23 Juli 2011 17:25 > *To:* [email protected] > *Subject:* Re: [belajar-excel] Auto Sort ComboBox**** > > ** ** > > **** > > Hai Ridwan, > > range yang dimasukkan pada key sort merujuk ke sheet yang berbeda dengan > area sort. > > coba manfaatkan penggunaan variabel ber-type object range > > Regards. > Kid. > > **** > > 2011/7/23 Ridwan Rahman <[email protected]>**** > > **** > > Mohon bantuannya kepada rekan-rekan semuanya**** > > Saya ada masalah dengan tombol refresh (combo box) yang saya buat (makro > saya dapat dari rekan milis)**** > > Tapi muncul error, apa yang salah ya?**** > > Mohon pencerahannya,**** > > **** > > Regards**** > > Ridwan Rahman**** > > ** ** > > ** ** > > **** > > >
