excel vba中復(fù)合框怎樣賦值？excel vba中我在窗體使用復(fù)合框ComboBox1，同時(shí)想將其下拉菜單指定到sheet1表中的A列？將I=1添加到[a65536]。結(jié)束（xlup）。行“1到

excel vba中復(fù)合框怎樣賦值？

excel vba中我在窗體使用復(fù)合框ComboBox1，同時(shí)想將其下拉菜單指定到sheet1表中的A列？

將I=1添加到[a65536]。結(jié)束（xlup）。行“1到combobox1的最后一行。附加項(xiàng)范圍（“a”和I）。窗體激活事件的下一個(gè)值

假設(shè)組合框的名稱是combobox1，下拉菜單是combobox1的list屬性。List（）=范圍（“C1:C”&；范圍（“c65536”）。結(jié)束（3）。行）如果C列中有重復(fù)的值，可以考慮使用字典來重復(fù)它們，然后使用combobox1。列表（）=dic.鑰匙這樣就可以用

~]的形式賦值，并使用組合框控件，組合框控件將文本框和列表框的功能結(jié)合起來。使用此控件，用戶可以通過在組合框或列表中輸入文本來選擇項(xiàng)目。Option ExplicitPrivate Sub Combo1uclick（）Text1=Combo1End SubPrivate Sub Formuload（）dim entry，I“聲明變量。對于I=1到100“計(jì)數(shù)值從1到100。Entry=“Entry”&I“創(chuàng)建一個(gè)條目。組合1。AddItem entry“添加條目。下一個(gè)IEnd Sub