excel vba中复合框怎样赋值？

如题，我用VBA编程不知道怎样给复合框赋值，用什么公式？另外，我可不可以在某个区域，如A1：A30中循环选出不重复的单元格字符，分别赋值给复合框呢？高手知道的请指点！急！

---

ComboBox1
RowSource 属性团没宏
object.RowSource [= String]
例如：ComboBox1.RowSource = "Sheet1!A1:C3"

Text 属性
object.Text [= String
例如：察历ComboBox1.Text = "塌册aaaa"

---