کار با combo box

[z.fotouhi]

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

[علی فاطمی]

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

[علی فاطمی]

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

[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 کمبو باکس (http://forum.exceliran.com/showthread.php/4860-%D9%88%D8%B1%D9%88%D8%AF-%D9%85%D8%B3%D8%AA%D9%82%D9%8A%D9%85-%D8%A2%D9%8A%D8%AA%D9%85-%D9%87%D8%A7-%D8%A8%D9%87-rowsource-%DA%A9%D9%85%D8%A8%D9%88-%D8%A8%D8%A7%DA%A9%D8%B3)