Comboboxta Arrayin elemanlarını göstermek?

[hsayar]

arrCeptelKod = Array(505, 506, 532, 533, 534, 535, 536, 537, 538, 542, 543, 544, 546, 547, 555, 556)
şeklinde bir dizmiz var diyelim comboboxta bu elemanlar nası gösterilir? (Tabiki herbiri ayrı satırda)

 

[hamitcan]

Aşağıdaki şekilde deneyin.

Private Sub UserForm_Initialize()
    For i = 0 To 15
    arrCeptelKod = Array(505, 506, 532, 533, 534, 535, 536, 537, 538, 542, 543, 544, 546, 547, 555, 556)
    ComboBox1.AddItem arrCeptelKod(i)
    Next
End Sub

 

[hsayar]

Private Sub UserForm_Initialize()
................
'Cep telefon kodlarıno combobaxa getir Hamitcan/excelweb
    arrCeptelKod = Array(505, 506, 530, 532, 533, 534, 535, 536, 537, 538, 542, 543, 544, 546, 547, 555, 556)
    For i = 0 To UBound(arrCeptelKod)
    ComboBox7.AddItem arrCeptelKod(i)
    ComboBox8.AddItem arrCeptelKod(i)
    Next
End Sub

şeklinde düzenledim teşekkürler