Rowsource ile yapmak zor onun yerine additem ile verileri comboya aktarın. Aşağıdaki örneği kendinize uyarlayabilirsiniz. Aşağıdaki kod A sütunundaki verileri comboboxa alıyor.
[vb:1:47fe52ad33]Private Sub UserForm_Initialize()
For a = 1 To Cells(65536, 1).End(xlUp).Row
If Cells(a, 1) <> 0 Then
ComboBox1.AddItem Cells(a, 1).Value
End If
Next
End Sub
[/vb:1:47fe52ad33]
Sn.leventm bu kodu userofrumn intlialize olayina yazdim su hatayi verdi.userform2.show.
ayrica benim userforumumda en az 6 adet combobox var bu kodu hepsinede yazabilirmiyim?
Sizlere daha iyi bir deneyim sunabilmek icin sitemizde çerez konumlandırmaktayız, web sitemizi kullanmaya devam ettiğinizde çerezler ile toplanan kişisel verileriniz Veri Politikamız / Bilgilendirmelerimizde belirtilen amaçlar ve yöntemlerle mevzuatına uygun olarak kullanılacaktır.