Wa'alaikumussalam wr wb
Hai Ozan,
Tentang ActiveX control ListBox ber-header :
1. ActiveX control ListBox memiliki properti bernama ColumnHeads.
2. Nilai untuk properti ini adalah TRUE (ListBox menampilkan header) atau
FALSE [default] (ListBox tidak menampilkan header).
3. Properti ColumnHeads hanya berpasangan dengan properti RowSource (jika
ListBox diletakkan dalam UserForm) atau ListFillRange (jika ListBox
diletakkan di dalam worksheet).
4. Properti RowSource atau ListFillRange diisi dengan alamat lengkap area
range sumber data yang akan menjadi isi ListBox atau diisi dengan nama
range (nama range dengan scope workbook jika ListBox di dalam UserForm atau
berbeda sheet dengan sumber data)
5. Area range sumber data untuk RowSource atau ListFillRange tidak berisi
baris header alias hanya record data saja, tetapi 1 (satu) baris tepat di
atas record pertamanya adalah baris header sebanyak 1 (satu) baris.
Contoh :
Sebuah ListBox yang ada di sebuah UserForm akan diisi dengan suatu data
yang ada di sheet bernama [Sumber Data]
Area records ada di range A2:B4
Header di baris 1, yaitu di A1:B1
Pengaturan properti ListBox
1. ColumnCount : diset bernilai 2, karena ingin menampilkan 2 kolom dari
sumber data.
* Renungkan juga manfaat pengaturan ColumnCount yang di-set nilainya
kurang dari jumlah kolom sumber data....
* Misal, sumber data memiliki 17 kolom, tetapi yang pantas
ditampilkan kehadapan user adalah 5 kolom pertama saja, maka ColumnCount di
set bernilai 5.
2. ColumnHeads : diset bernilai TRUE, karena ingin menampilkan baris header
(dalam hal ini baris bertuliskan Produk dan Nilai)
3. RowSource (karena ListBox ada di UserForm) [properti ListFillRange yang
digunakan bila ListBox di dalam worksheet]
diisi dengan bunyi alamat range sumber data sebagai berikut :
'Sumber Data'!$A$2:$B$4
* Jika area range A2:B4 telah dibuatkan sebuah nama range bernama
'_myList_' maka properti ini diisi dengan nama range tersebut
_myList_
----------------
Peringatan !!!
1. Pengubahan terhadap sumber data (misal suatu nilai di dalam range) harus
disertai pendefinisian ulang properti RowSource atau ListFillRange.
2. Untuk menghapus isi properti RowSource :
nama_listbox.RowSource=vbnullstring
3. Untuk mengisi properti RowSource :
nama_listbox.RowSource="rujukan sumber data"
* "rujukan sumber data" bisa berupa variabel bertipe string yang
berisi teks alamat lengkap sumber data atau nama range
Contoh : ListBox bernama lstPRODUK
lstPRODUK.RowSource=vbnullstring 'bersihkan dulu
lstPRODUK.RowSource="'Sumber Data'!$A$2:$B$4" 'definisikan ulang
Pendefinisian ulang jika merujuk ke suatu nama range :
lstPRODUK.RowSource="_myList_" 'definisikan ulang
Wassalamu'alaikum wr wb
Kid
2016-01-27 7:08 GMT+07:00 Pauzan Ozan [email protected] [belajar-excel] <
[email protected]>:
>
>
> Dear Para Master Be-Exceller
>
> Mohon bantuan untuk problem yang saya alami
> bgaimna VBA supaya saya dapat menampilkan judul header yg ad pada tabel ke
> listbox yang ada pd userform.(file terlampir)
> Atas bantuannya Saya hanya bisa ucapin terima kasih saja
>
> wassalam..
>
>
