Re: [milis-belajar-excel] Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-04-15 Terurut Topik 'idz.iman' idz.i...@yahoo.com [belajar-excel]
Apakah ada rencana bikin group telegram.?Sent from my Samsung Galaxy smartphone.
 Original message From: "'Mr. Kid' mr.nm...@gmail.com 
[belajar-excel]"  Date: 4/15/20  8:43 PM  
(GMT+07:00) To: Iman Darusman  Cc: BeExcel 
, Milis Belajar-Excel 
 Subject: Re: [milis-belajar-excel] Re: 
[belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox 
lebih dari sepuluh kolom 
 



  



  
  
  Semua milis di yahoogroups sudah dikosongkan oleh yahooSekarang milis 
berinteraksi via email.Sent from my smart enough phoneOn Apr 15, 2020, at 
18:01, Iman Darusman  wrote:
Assalammualaiku..apa kabar semua, semoga sehat2 dan selalu dalam 
Lindungan Allah azza wa jalla...saya mau taya kenapa saya gak bisa buka Milis 
Group Belajar excel lagi ya?hehesaya mau tanya adakah rumus sederhana untuk 
file terlampir?Barakallahu fiikumsalamIman





Pada Rabu, 25 Maret 2020 15.42.33 WIB, Mr. Kid 
 menulis:



tentang :  mendapatkan coding untuk Listbox yang sesuai dengan 
keinginan saya  > ada banyak cara untuk meng-extract records yang dibutuhkan, 
salah satunya dengan fitur advanced filter yang Anda gunakan. Cara lainnya 
memanfaatkan pivot tables dan sebagainya.tentang :    bagaimana membuat hasil 
pencarian lebih flexibel  > buat saja comboboxes untuk memilih nama header 
kriteria pencarian dan text box kriteria pencarian, lalu dibuat tabel kriteria 
berdasar pilihan di comboboxes dan text box terkait ke suatu range lalu 
dilakukan advanced filter (jika Anda menggunakan advanced filter). Ini sudah 
fleksibel. Hanya menulis nama header di range tertentu lalu menulis isi textbox 
nya dibahawa header lalu dilakukan advanced filter.> jika pakai pivot tables, 
filter saja setiap field di pivot tables sesuai kebutuhan, lalu definisikan 
range area pivot table yang terfilter, ganti listbox dengan area range 
tersebut.> jika pakai pivot tables dan slicer, set slicer sesuai kriteria yang 
diisi user, definisikan area pivot tables, ganti listbox dengan area range 
tersebut.> kalau hobinya pakai loop baca satu per satu di setiap kolom yang 
dibutuhkan, ya buat saja loopnya.tentang :  coding sebelumnya hasil pencarian 
sangat flexibel  > saya gak paham maksudnya ini apa ? beneran fleksibel ?> 
bukankah sebelumnya menggunakan proses loop untuk add item untuk mengisi 
listbox ?   berarti filternya pun akan loop per kolom kriteria yang dibutuhkan. 
Lalu fleksibelnya dimana ? kan sama saja harus mencari per kolom kriteria 
sesuai kebutuhan.> Andai kriterianya berdasar kolom Nama yang dicari adalah 
nama diawali su, seperti sukarman bin bla atau sulistiyani a. tapi hasilnya ada 
gatot subroto dan semacamnya yang tidak diawali su   Hal seperti ini paling 
fleksibel dengan advanced filter atau pivot tables (slicer kurang fleksibel 
untuk pencarian sebagian seperti ini)> Jadi yang dimaksud coding sebelumnya 
yang lebih fleksibel itu dimana ? Apalagi data berupa array yang sudah ada 
dalam listbox hasil loop add item, sudah lebih gak mungkin untuk fleksibel.   
Biasanya, kalau cara yang dianggap fleksibel padahal data sudah berupa array, 
harus dilakukan search per kolom array pakai loop juga.   Pengguna VBA pemula 
biasanya akan tergiur dengan fungsi Filter milik VBA, lalu dipakai disemua 
array data. Padahal harusnya tetap digunakan per elemen kolom array.> Saya 
curiga deh... Anda menganggap fleksibel itu jangan-jangan Anda pakai fungsi 
Filter dengan area pencarian langsung seluruh isi listbox yang disimpan sebagai 
array data.   Kalau kecurigaan tersebut benar, berarti Anda sudah tersesat. 
Sebaiknya segera ambil jalan balik kembali ke jalan yang wajar saja.   Pakai 
contoh seperti mencari yang su tadi saja. Mencari dikolom nama, kalau pakai 
Filter nya VBA ke seluruh isi listbox, akan ketemu gatot subroto juga.    Malah 
kalau pakai filter nya VBA ke seluruh isi listbox bisa lebih parah lagi 
hasilnya,    misal ada kolom alamat juga, yang isinya jalan menteri supeno atau 
supermall bekasi atau su lainnya di kolom lainnya akan ikut keluar menjadi 
hasil, walau di kolom nama gak ada bunyi suhmmm jadi bingung...kok bisa si 
kid nyaranin sesuatu yang gak efisien gak bisa fleksibel atau gak se-universal 
mungkin ya ?si kid lagi error kali ya.. :(tentang :  textbox yang tampilan dari 
hasil listbox berupa tanggal, berubah formatnya  > disisi internal listbox itu 
sendiri :    a. listbox yang diisi dengan add item akan menampilkan apa yang 
disimpannya    b. listbox yang diisi dengan merujuk ke object lain (lewat 
properti listfillrange atau rowsource), akan menampilkan apa yang ditampilkan 
sumber data dan tidak menyimpan nilai sumber data)> jadi, ketika mengambil 
nilai dari listbox (misal si textbox mengambil nilai dari listbox, artinya si 
textbox sebagai peminta) :   a. listbox yang diisi dengan 

Re: [milis-belajar-excel] Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-04-15 Terurut Topik 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
Semua milis di yahoogroups sudah dikosongkan oleh yahoo
Sekarang milis berinteraksi via email.


Sent from my smart enough phone

> On Apr 15, 2020, at 18:01, Iman Darusman  wrote:
> 
> Assalammualaiku..
> 
> apa kabar semua, semoga sehat2 dan selalu dalam Lindungan Allah azza wa 
> jalla...
> 
> saya mau taya kenapa saya gak bisa buka Milis Group Belajar excel lagi ya?
> 
> hehe
> 
> saya mau tanya adakah rumus sederhana untuk file terlampir?
> 
> 
> Barakallahu fiikum
> 
> salam
> Iman
> 
> 
> 
> Pada Rabu, 25 Maret 2020 15.42.33 WIB, Mr. Kid  menulis:
> 
> 
> tentang :
>   mendapatkan coding untuk Listbox yang sesuai dengan keinginan saya  
> > ada banyak cara untuk meng-extract records yang dibutuhkan, salah satunya 
> > dengan fitur advanced filter yang Anda gunakan. Cara lainnya memanfaatkan 
> > pivot tables dan sebagainya.
> 
> 
> tentang :  
>   bagaimana membuat hasil pencarian lebih flexibel  
> > buat saja comboboxes untuk memilih nama header kriteria pencarian dan text 
> > box kriteria pencarian, lalu dibuat tabel kriteria berdasar pilihan di 
> > comboboxes dan text box terkait ke suatu range lalu dilakukan advanced 
> > filter (jika Anda menggunakan advanced filter). Ini sudah fleksibel. Hanya 
> > menulis nama header di range tertentu lalu menulis isi textbox nya dibahawa 
> > header lalu dilakukan advanced filter.
> > jika pakai pivot tables, filter saja setiap field di pivot tables sesuai 
> > kebutuhan, lalu definisikan range area pivot table yang terfilter, ganti 
> > listbox dengan area range tersebut.
> > jika pakai pivot tables dan slicer, set slicer sesuai kriteria yang diisi 
> > user, definisikan area pivot tables, ganti listbox dengan area range 
> > tersebut.
> > kalau hobinya pakai loop baca satu per satu di setiap kolom yang 
> > dibutuhkan, ya buat saja loopnya.
> 
> 
> tentang :
>   coding sebelumnya hasil pencarian sangat flexibel  
> > saya gak paham maksudnya ini apa ? beneran fleksibel ?
> > bukankah sebelumnya menggunakan proses loop untuk add item untuk mengisi 
> > listbox ?
>berarti filternya pun akan loop per kolom kriteria yang dibutuhkan. Lalu 
> fleksibelnya dimana ? kan sama saja harus mencari per kolom kriteria sesuai 
> kebutuhan.
> > Andai kriterianya berdasar kolom Nama yang dicari adalah nama diawali su, 
> > seperti sukarman bin bla atau sulistiyani a. tapi hasilnya ada gatot 
> > subroto dan semacamnya yang tidak diawali su
>Hal seperti ini paling fleksibel dengan advanced filter atau pivot tables 
> (slicer kurang fleksibel untuk pencarian sebagian seperti ini)
> > Jadi yang dimaksud coding sebelumnya yang lebih fleksibel itu dimana ? 
> > Apalagi data berupa array yang sudah ada dalam listbox hasil loop add item, 
> > sudah lebih gak mungkin untuk fleksibel.
>Biasanya, kalau cara yang dianggap fleksibel padahal data sudah berupa 
> array, harus dilakukan search per kolom array pakai loop juga.
>Pengguna VBA pemula biasanya akan tergiur dengan fungsi Filter milik VBA, 
> lalu dipakai disemua array data. Padahal harusnya tetap digunakan per elemen 
> kolom array.
> > Saya curiga deh... Anda menganggap fleksibel itu jangan-jangan Anda pakai 
> > fungsi Filter dengan area pencarian langsung seluruh isi listbox yang 
> > disimpan sebagai array data.
>Kalau kecurigaan tersebut benar, berarti Anda sudah tersesat. Sebaiknya 
> segera ambil jalan balik kembali ke jalan yang wajar saja.
>Pakai contoh seperti mencari yang su tadi saja. Mencari dikolom nama, 
> kalau pakai Filter nya VBA ke seluruh isi listbox, akan ketemu gatot subroto 
> juga. 
>Malah kalau pakai filter nya VBA ke seluruh isi listbox bisa lebih parah 
> lagi hasilnya, 
>misal ada kolom alamat juga, yang isinya jalan menteri supeno atau 
> supermall bekasi atau su lainnya di kolom lainnya akan ikut keluar menjadi 
> hasil, walau di kolom nama gak ada bunyi su
> 
> hmmm jadi bingung...
> kok bisa si kid nyaranin sesuatu yang gak efisien gak bisa fleksibel atau gak 
> se-universal mungkin ya ?
> si kid lagi error kali ya.. 
> :(
> 
> tentang :
>   textbox yang tampilan dari hasil listbox berupa tanggal, berubah formatnya  
> > disisi internal listbox itu sendiri :
> a. listbox yang diisi dengan add item akan menampilkan apa yang 
> disimpannya
> b. listbox yang diisi dengan merujuk ke object lain (lewat properti 
> listfillrange atau rowsource), akan menampilkan apa yang ditampilkan sumber 
> data dan tidak menyimpan nilai sumber data)
> > jadi, ketika mengambil nilai dari listbox (misal si textbox mengambil nilai 
> > dari listbox, artinya si textbox sebagai peminta) :
>a. listbox yang diisi dengan add item akan menyerahkan nilai yang disimpan 
> oleh si listbox kepada pihak yang meminta
>b. listbox yang diisi dengan listfillrange atau rowsource akan 
> mengambilkan nilai dari sumbernya, lalu menyerahkan nilai yang diambil itu 
> kepada pihak yang meminta
> > Pada listbox yang diisi dengan rujukan ke object lain (listfillrange atau 
> > 

Re: [milis-belajar-excel] Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-04-15 Terurut Topik Iman Darusman idz.i...@yahoo.com [belajar-excel]
 Assalammualaiku..

apa kabar semua, semoga sehat2 dan selalu dalam Lindungan Allah azza wa jalla...

saya mau taya kenapa saya gak bisa buka Milis Group Belajar excel lagi ya?
hehe
saya mau tanya adakah rumus sederhana untuk file terlampir?

Barakallahu fiikum
salamIman


Pada Rabu, 25 Maret 2020 15.42.33 WIB, Mr. Kid  
menulis:  
 
 tentang :
  mendapatkan coding untuk Listbox yang sesuai dengan keinginan saya  
> ada banyak cara untuk meng-extract records yang dibutuhkan, salah satunya 
> dengan fitur advanced filter yang Anda gunakan. Cara lainnya memanfaatkan 
> pivot tables dan sebagainya.

tentang :  

  bagaimana membuat hasil pencarian lebih flexibel  
> buat saja comboboxes untuk memilih nama header kriteria pencarian dan text 
> box kriteria pencarian, lalu dibuat tabel kriteria berdasar pilihan di 
> comboboxes dan text box terkait ke suatu range lalu dilakukan advanced filter 
> (jika Anda menggunakan advanced filter). Ini sudah fleksibel. Hanya menulis 
> nama header di range tertentu lalu menulis isi textbox nya dibahawa header 
> lalu dilakukan advanced filter.> jika pakai pivot tables, filter saja setiap 
> field di pivot tables sesuai kebutuhan, lalu definisikan range area pivot 
> table yang terfilter, ganti listbox dengan area range tersebut.> jika pakai 
> pivot tables dan slicer, set slicer sesuai kriteria yang diisi user, 
> definisikan area pivot tables, ganti listbox dengan area range tersebut.> 
> kalau hobinya pakai loop baca satu per satu di setiap kolom yang dibutuhkan, 
> ya buat saja loopnya.

tentang :
  coding sebelumnya hasil pencarian sangat flexibel  
> saya gak paham maksudnya ini apa ? beneran fleksibel ?> bukankah sebelumnya 
> menggunakan proses loop untuk add item untuk mengisi listbox ?   berarti 
> filternya pun akan loop per kolom kriteria yang dibutuhkan. Lalu fleksibelnya 
> dimana ? kan sama saja harus mencari per kolom kriteria sesuai kebutuhan.> 
> Andai kriterianya berdasar kolom Nama yang dicari adalah nama diawali su, 
> seperti sukarman bin bla atau sulistiyani a. tapi hasilnya ada gatot subroto 
> dan semacamnya yang tidak diawali su   Hal seperti ini paling fleksibel 
> dengan advanced filter atau pivot tables (slicer kurang fleksibel untuk 
> pencarian sebagian seperti ini)> Jadi yang dimaksud coding sebelumnya yang 
> lebih fleksibel itu dimana ? Apalagi data berupa array yang sudah ada dalam 
> listbox hasil loop add item, sudah lebih gak mungkin untuk fleksibel.   
> Biasanya, kalau cara yang dianggap fleksibel padahal data sudah berupa array, 
> harus dilakukan search per kolom array pakai loop juga.   Pengguna VBA pemula 
> biasanya akan tergiur dengan fungsi Filter milik VBA, lalu dipakai disemua 
> array data. Padahal harusnya tetap digunakan per elemen kolom array.> Saya 
> curiga deh... Anda menganggap fleksibel itu jangan-jangan Anda pakai fungsi 
> Filter dengan area pencarian langsung seluruh isi listbox yang disimpan 
> sebagai array data.   Kalau kecurigaan tersebut benar, berarti Anda sudah 
> tersesat. Sebaiknya segera ambil jalan balik kembali ke jalan yang wajar 
> saja.   Pakai contoh seperti mencari yang su tadi saja. Mencari dikolom nama, 
> kalau pakai Filter nya VBA ke seluruh isi listbox, akan ketemu gatot subroto 
> juga.    Malah kalau pakai filter nya VBA ke seluruh isi listbox bisa lebih 
> parah lagi hasilnya,    misal ada kolom alamat juga, yang isinya jalan 
> menteri supeno atau supermall bekasi atau su lainnya di kolom lainnya akan 
> ikut keluar menjadi hasil, walau di kolom nama gak ada bunyi su
hmmm jadi bingung...kok bisa si kid nyaranin sesuatu yang gak efisien gak 
bisa fleksibel atau gak se-universal mungkin ya ?si kid lagi error kali ya.. :(
tentang :
  textbox yang tampilan dari hasil listbox berupa tanggal, berubah formatnya  
> disisi internal listbox itu sendiri :    a. listbox yang diisi dengan add 
> item akan menampilkan apa yang disimpannya    b. listbox yang diisi dengan 
> merujuk ke object lain (lewat properti listfillrange atau rowsource), akan 
> menampilkan apa yang ditampilkan sumber data dan tidak menyimpan nilai sumber 
> data)> jadi, ketika mengambil nilai dari listbox (misal si textbox mengambil 
> nilai dari listbox, artinya si textbox sebagai peminta) :   a. listbox yang 
> diisi dengan add item akan menyerahkan nilai yang disimpan oleh si listbox 
> kepada pihak yang meminta   b. listbox yang diisi dengan listfillrange atau 
> rowsource akan mengambilkan nilai dari sumbernya, lalu menyerahkan nilai yang 
> diambil itu kepada pihak yang meminta> Pada listbox yang diisi dengan rujukan 
> ke object lain (listfillrange atau rowsource) akan didapat nilai asli dari 
> sumbernya.> Data tanggal bertipe datetime memiliki nilai asli berupa serial 
> date dari 0 sampai sekian. > Kalau ambil dari listbox yang pakai 
> listfillrange atau rowsource, dan sumber data bertipe datetime,    lakukan 
> format sebelum ditampilkan dalam textbox (fungsi Format di VBA, seperti 
> fungsi Text di Excel 

Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-03-25 Terurut Topik Gobang Gocir gobang13...@yahoo.com [belajar-excel]
 Daer Mr Kids dan Para Suhu,
Sebelumnya trimakasih atas pencerahannya, maaf kalau ternyata peenyataanya 
membingungkan
Mungkin kata Flexibel sangat luas, saya hanya ingin Pencarian lebih sama dengan 
program yang pertama saya dapate dengan menggunakan Unbound,
Contoh program pertama: Ketika kita mencari BUDI yang keluar dari Nama BUDI 
SETIAWAN, dan Bambang Budi keluar
Contoh Program kedua dengan Bound : Ketika kita mencari Nama BUDI, yang keluar 
hanya BUDI setiawan saja, Bambang Budi tidak muncul
Mohon maaf kalau ternyata pertanyaan salah,
Tapi saya sudah dapat jawabanya dari Milis sebelah, dengan menggunakan Asterik 
(*) sebelum dan sesudah kata cari nya

Private Sub TxtCariData_Change()
Sheets("DB").Range("CG2").Value = "*" & UserForm1.TxtCariData.Text & "*"
End Subdan Untuk Text nya benar di buat format tanggalnya dulu

TextBox1.Value = Format(ListBox1.List(ListBox1.ListIndex, 6), "dd-mmm-yy")
Trimakasih Mr. Kids atas pembelajaranya
Bambang




On Wednesday, March 25, 2020, 03:42:31 PM GMT+7, 'Mr. Kid' 
mr.nm...@gmail.com [belajar-excel]  wrote:  
 
     

tentang :
  mendapatkan coding untuk Listbox yang sesuai dengan keinginan saya  
> ada banyak cara untuk meng-extract records yang dibutuhkan, salah satunya 
> dengan fitur advanced filter yang Anda gunakan. Cara lainnya memanfaatkan 
> pivot tables dan sebagainya.

tentang :  

  bagaimana membuat hasil pencarian lebih flexibel  
> buat saja comboboxes untuk memilih nama header kriteria pencarian dan text 
> box kriteria pencarian, lalu dibuat tabel kriteria berdasar pilihan di 
> comboboxes dan text box terkait ke suatu range lalu dilakukan advanced filter 
> (jika Anda menggunakan advanced filter). Ini sudah fleksibel. Hanya menulis 
> nama header di range tertentu lalu menulis isi textbox nya dibahawa header 
> lalu dilakukan advanced filter.> jika pakai pivot tables, filter saja setiap 
> field di pivot tables sesuai kebutuhan, lalu definisikan range area pivot 
> table yang terfilter, ganti listbox dengan area range tersebut.> jika pakai 
> pivot tables dan slicer, set slicer sesuai kriteria yang diisi user, 
> definisikan area pivot tables, ganti listbox dengan area range tersebut.> 
> kalau hobinya pakai loop baca satu per satu di setiap kolom yang dibutuhkan, 
> ya buat saja loopnya.

tentang :
  coding sebelumnya hasil pencarian sangat flexibel  
> saya gak paham maksudnya ini apa ? beneran fleksibel ?> bukankah sebelumnya 
> menggunakan proses loop untuk add item untuk mengisi listbox ?   berarti 
> filternya pun akan loop per kolom kriteria yang dibutuhkan. Lalu fleksibelnya 
> dimana ? kan sama saja harus mencari per kolom kriteria sesuai kebutuhan.> 
> Andai kriterianya berdasar kolom Nama yang dicari adalah nama diawali su, 
> seperti sukarman bin bla atau sulistiyani a. tapi hasilnya ada gatot subroto 
> dan semacamnya yang tidak diawali su   Hal seperti ini paling fleksibel 
> dengan advanced filter atau pivot tables (slicer kurang fleksibel untuk 
> pencarian sebagian seperti ini)> Jadi yang dimaksud coding sebelumnya yang 
> lebih fleksibel itu dimana ? Apalagi data berupa array yang sudah ada dalam 
> listbox hasil loop add item, sudah lebih gak mungkin untuk fleksibel.   
> Biasanya, kalau cara yang dianggap fleksibel padahal data sudah berupa array, 
> harus dilakukan search per kolom array pakai loop juga.   Pengguna VBA pemula 
> biasanya akan tergiur dengan fungsi Filter milik VBA, lalu dipakai disemua 
> array data.. Padahal harusnya tetap digunakan per elemen kolom array.> Saya 
> curiga deh... Anda menganggap fleksibel itu jangan-jangan Anda pakai fungsi 
> Filter dengan area pencarian langsung seluruh isi listbox yang disimpan 
> sebagai array data.   Kalau kecurigaan tersebut benar, berarti Anda sudah 
> tersesat. Sebaiknya segera ambil jalan balik kembali ke jalan yang wajar 
> saja.   Pakai contoh seperti mencari yang su tadi saja. Mencari dikolom nama, 
> kalau pakai Filter nya VBA ke seluruh isi listbox, akan ketemu gatot subroto 
> juga.    Malah kalau pakai filter nya VBA ke seluruh isi listbox bisa lebih 
> parah lagi hasilnya,    misal ada kolom alamat juga, yang isinya jalan 
> menteri supeno atau supermall bekasi atau su lainnya di kolom lainnya akan 
> ikut keluar menjadi hasil, walau di kolom nama gak ada bunyi su
hmmm jadi bingung...kok bisa si kid nyaranin sesuatu yang gak efisien gak 
bisa fleksibel atau gak se-universal mungkin ya ?si kid lagi error kali ya.. :(
tentang :
  textbox yang tampilan dari hasil listbox berupa tanggal, berubah formatnya  
> disisi internal listbox itu sendiri :    a. listbox yang diisi dengan add 
> item akan menampilkan apa yang disimpannya    b. listbox yang diisi dengan 
> merujuk ke object lain (lewat properti listfillrange atau rowsource), akan 
> menampilkan apa yang ditampilkan sumber data dan tidak menyimpan nilai sumber 
> data)> jadi, ketika mengambil nilai dari listbox (misal si textbox mengambil 
> nilai dari listbox, artinya si textbox sebagai peminta) :  

Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-03-25 Terurut Topik 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
tentang :

>   mendapatkan coding untuk Listbox yang sesuai dengan keinginan saya

> ada banyak cara untuk meng-extract records yang dibutuhkan, salah satunya
dengan fitur advanced filter yang Anda gunakan. Cara lainnya memanfaatkan
pivot tables dan sebagainya.


tentang :

>   bagaimana membuat hasil pencarian lebih flexibel

> buat saja comboboxes untuk memilih nama header kriteria pencarian dan
text box kriteria pencarian, lalu dibuat tabel kriteria berdasar pilihan di
comboboxes dan text box terkait ke suatu range lalu dilakukan advanced
filter (jika Anda menggunakan advanced filter). Ini sudah fleksibel. Hanya
menulis nama header di range tertentu lalu menulis isi textbox nya
dibahawa header lalu dilakukan advanced filter.
> jika pakai pivot tables, filter saja setiap field di pivot tables sesuai
kebutuhan, lalu definisikan range area pivot table yang terfilter, ganti
listbox dengan area range tersebut.
> jika pakai pivot tables dan slicer, set slicer sesuai kriteria yang diisi
user, definisikan area pivot tables, ganti listbox dengan area range
tersebut.
> kalau hobinya pakai loop baca satu per satu di setiap kolom yang
dibutuhkan, ya buat saja loopnya.


tentang :

>   coding sebelumnya hasil pencarian sangat flexibel

> saya gak paham maksudnya ini apa ? beneran fleksibel ?
> bukankah sebelumnya menggunakan proses loop untuk add item untuk mengisi
listbox ?
   berarti filternya pun akan loop per kolom kriteria yang dibutuhkan. Lalu
fleksibelnya dimana ? kan sama saja harus mencari per kolom kriteria sesuai
kebutuhan.
> Andai kriterianya berdasar kolom Nama yang dicari adalah nama diawali su,
seperti sukarman bin bla atau sulistiyani a. tapi hasilnya ada gatot
subroto dan semacamnya yang tidak diawali su
   Hal seperti ini paling fleksibel dengan advanced filter atau pivot
tables (slicer kurang fleksibel untuk pencarian sebagian seperti ini)
> Jadi yang dimaksud coding sebelumnya yang lebih fleksibel itu dimana ?
Apalagi data berupa array yang sudah ada dalam listbox hasil loop add item,
sudah lebih gak mungkin untuk fleksibel.
   Biasanya, kalau cara yang dianggap fleksibel padahal data sudah berupa
array, harus dilakukan search per kolom array pakai loop juga.
   Pengguna VBA pemula biasanya akan tergiur dengan fungsi Filter milik
VBA, lalu dipakai disemua array data. Padahal harusnya tetap digunakan per
elemen kolom array.
> Saya curiga deh... Anda menganggap fleksibel itu jangan-jangan Anda pakai
fungsi Filter dengan area pencarian langsung seluruh isi listbox yang
disimpan sebagai array data.
   Kalau kecurigaan tersebut benar, berarti Anda sudah tersesat. Sebaiknya
segera ambil jalan balik kembali ke jalan yang wajar saja.
   Pakai contoh seperti mencari yang su tadi saja. Mencari dikolom nama,
kalau pakai Filter nya VBA ke seluruh isi listbox, akan ketemu gatot
subroto juga.
   Malah kalau pakai filter nya VBA ke seluruh isi listbox bisa lebih parah
lagi hasilnya,
   misal ada kolom alamat juga, yang isinya jalan menteri supeno atau
supermall bekasi atau su lainnya di kolom lainnya akan ikut keluar menjadi
hasil, walau di kolom nama gak ada bunyi su

hmmm jadi bingung...
kok bisa si kid nyaranin sesuatu yang gak efisien gak bisa fleksibel atau
gak se-universal mungkin ya ?
si kid lagi error kali ya..
:(

tentang :

>   textbox yang tampilan dari hasil listbox berupa tanggal, berubah
> formatnya

> disisi internal listbox itu sendiri :
a. listbox yang diisi dengan add item akan menampilkan apa yang
disimpannya
b. listbox yang diisi dengan merujuk ke object lain (lewat
properti listfillrange atau rowsource), akan menampilkan apa yang
ditampilkan sumber data dan tidak menyimpan nilai sumber data)
> jadi, ketika mengambil nilai dari listbox (misal si textbox mengambil
nilai dari listbox, artinya si textbox sebagai peminta) :
   a. listbox yang diisi dengan add item akan menyerahkan nilai yang
disimpan oleh si listbox kepada pihak yang meminta
   b. listbox yang diisi dengan listfillrange atau rowsource akan
mengambilkan nilai dari sumbernya, lalu menyerahkan nilai yang diambil itu
kepada pihak yang meminta
> Pada listbox yang diisi dengan rujukan ke object lain (listfillrange atau
rowsource) akan didapat nilai asli dari sumbernya.
> Data tanggal bertipe datetime memiliki nilai asli berupa serial date dari
0 sampai sekian.
> Kalau ambil dari listbox yang pakai listfillrange atau rowsource, dan
sumber data bertipe datetime,
   lakukan format sebelum ditampilkan dalam textbox (fungsi Format di VBA,
seperti fungsi Text di Excel dengan kelebihan dan kekurangan masing-masing)





On Wed, Mar 18, 2020 at 10:01 AM Gobang Gocir gobang13...@yahoo.com
[belajar-excel]  wrote:

>
>
> Dear Mr. Kid dan Milis Belajar Excel,
>
> Trimakasih atas masukan dan pembelajaranya, setelah mencari apa yang di
> ajari oleh Mr. Kid saya mendapatkan coding untuk Listbox yang sesuai dengan
> keinginan saya, yang saya mau tanyakan bagaimana membuat hasil pencarian
> lebih flexibel, karana coding sebelumnya hasil 

Re: [belajar-excel] Mohon bantuanya, Bagaimana memunculkan informasi di listbox lebih dari sepuluh kolom

2020-03-16 Terurut Topik 'Mr. Kid' mr.nm...@gmail.com [belajar-excel]
ini mesti listbox yang unbound, yang ngisi listbox nya pakai additem trus
isi kolom berikutnya pakai properti List. Kalau pakai ini, maksimal hanya
10 kolom.
mbok ya pakai listbox yang bound, ngisi listboxnya pakai ngeset area range
worksheet di properti ListFillRange (kalau listbox di worksheet) atau
RowSource (kalau listbox di userform).
Kalau pakai bound listbox seperti ini, kalau mau nampilin header, set
properti ColumnHeads bernilai true. Ingat, area range yang di-set hanya
record data. baris header tidak ikut disebut tapi harus tepat hanya di 1
baris sebelum baris pertama data.
Kalau mau hide kolom, set di columnwidths, supaya lebar kolom itu adalah 0.
Kalau mau sort listbox, cukup sort sumber datanya, lalu set ulang
listfillrange atau rowsource

Contoh :
regional setting : EN-us
sheet bernama 'datanya kid'
header di A1:Z1  (26 kolom)
data di A2:Z37 (36 baris)
header ditampilkan
kolom B (kolom ke-2) dan kolom E (kolom ke-5) di-hide, selainnya ditampilkan

set di listbox (pakai script atau sejak design)
1. ColumnCount : diset bernilai 26
2. ColumnHeads : diset true
3. ListFillRange (kalau listbox di worksheet) atau RowSource (kalau di
userform) : diset berisi string berbunyi   'datanya kid'!A2:Z37
4. ColumnWidths : diset 50;0;50;50;0 -> angka 50 adalah contoh untuk
kolom yang di-set dengan lebar 50 pt
jika ada opsi sort isi listbox :
- lakukan sort di A1:Z37
- kemudian set nomor 3 dengan vbnullstring   -> di clear
- lalu set lagi nomor 3 dengan  'datanya kid'!A2:Z37  -> reset
mau clear listbox ? set nomor 3 dengan vbnullstring

properrti fillcolor untuk control namanya BackColor
kondisi 'jika kosong' berarti panjang karakter isinya adalah 0
if len(textboxnya.text)=0 then textboxnya.backcolor=vbwhite else
textboxtnya.backcolor=vbyellow





On Mon, Mar 16, 2020 at 11:48 AM Gobang Gocir gobang13...@yahoo.com
[belajar-excel]  wrote:

>
>
> Dear Para Suhu Milis belajar Excel,
>
> Mohon bantuanya untuk kasus saya, saya sudah mencoba "menyontek" code2 vba
> dari internet termasuk dari milis excel,
> saya mempunyai data dengan banyak kolom, dan saya ingin memunculkanya di
> form untuk sebagian informasi yang dianggap penting,
> permasalahanya ketika saya mau tampilkan 12 dari kolom yang ada di listbox
> ke textbox itu terjadi error,
> di listbox ke textbox yang ada hanya bisa menampilkan 10 item.
>
> Kemudian saya juga mencoba untuk membuat textbox berubah warna apa bila di
> textbox tersebut kosong
>
> Trimakasih sebelum nya dan mohon Bantuanya, file terlampir
>
> Best Regards
> Bambang
>
> 
>