Listbox'a veri aktarmak

[amenejist]

Arkadaşlar 4 sütunlu bir veri tabanım var.Benim yapmak istediğim bu veri tabanında yer alan hücre değerlerini (4 sütunun birden...)bir form üzerindeki listbox'a aktarmak.
Bana bu konuda yardımcı olacak arkadaşlara şimdiden teşekkür ederim.

 

[Orion1]

A1: D30 aralığını listbox'ta listeler.
Kodlar userformun initialize olayındadır.

Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 4
ListBox1.RowSource = "A1:D30"
End Sub