کار با combo box

[z.fotouhi]

سلام
یه سوال خیلی ابتدایی ولی لطفا جواب بدید.
چطوری یه لیست رو در vb اکسل، وارد combo box کنم؟ اوایل کارم با vbهستش و نمیدونم چطوری یه لیست رو وارد کنم؟

[علی فاطمی]

با سلام ببینین تصویر پیوست کمکی میکنه.

[علی فاطمی]

اگر هم در userform بخواهید عکس پیوست رو ببینین.

[Ali Parsaei]

سلام،
اگر هم بخواهيد اتوماتيک موقع باز شدن فرم داده هايي در COMBOBOX قرار گيرد هم از کد زير مي توانيد استفاده کنيد:

Private Sub UserForm_Initialize()
Dim C As Range
For Each C In Range("A1:A10")
ComboBox1.AddItem C.Text
Next
End Sub

من بر حسب محدوده فرضي A1 تا A10 کد را نوشته ام
ضمنا" لينک زير هم شايد به درد بخورد:
[حل شده] ورود مستقيم آيتم ها به rowsource کمبو باکس