lihat posting 6 Des 2011 ( listbox multi selection )
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-ListBox-Multi-Selection-td5047708.html#a5050258
http://milis-belajar-excel.1048464.n5.nabble.com/belajar-excel-Shorting-n-Delete-listbox-td5119388.html#a5121605
pada dua treads itu ada banyak lampiran contoh
yg perlu dilihat adalah properties: Column Count dan ColumnHead
lihat contoh dari Mr Kid dlm UserForm Init ini
Private Sub UserForm_Initialize()
Set Tabel = Sheets("Sheet1").Range("A1").CurrentRegion.Offset(1, 0)
Application.EnableEvents = False
With Me.ListBox1
.Clear
For i = 1 To Tabel.Rows.Count - 1
.AddItem
.List(.ListCount - 1, 0) = Tabel(i, 1)
.List(.ListCount - 1, 1) = Tabel(i, 2)
.List(.ListCount - 1, 2) = Tabel(i, 3)
Next i
.BoundColumn = 1
* .ColumnCount = 3 *
* .ColumnHeads = True *
.TextColumn = True
.ListStyle = fmListStyleOption
.ListIndex = 0
End With
Application.EnableEvents = True
End Sub
*o'Seno*
*
*
*
*
2012/1/19 Irwan didi <[email protected]>
> Dear master excel,
> Mau tanya lagi dan lagi hehehehe.... katanya malu bertanya kerja manual
hehehehe...
> pertanyaan saya : bagaimana menampilkan data pada listbox (userform)
dengan data beberapa column plus column heading.
> kira2 seperti ini gambaran listboxnya, data saya ambil dari worksheet
yang memenuhi kriteria yang diminta.
>
> No Nama Alamat No telp
> 1 Adi Malang 123456
>
> Terima kasih
> one
