Question

VBA 中combobox 的属性使用

我知道可以通过修改TEXT属性改确认初始值,但是不能通过属性窗口定义下拉内容,如我需要在下拉内容中分别输入"青菜","白菜".
我试着用COMBOBOX或者SHEET1的 CLICK,或CHANGE方法时加入, 用ITEMADD,但是当焦点离开后,会造成重复加入,如何解决呢?
如果在THISWORKBOOK.OPEN中加入,却又找不到对象,为什么?应该怎样初始数据呢?求助!

Answer 1

在左边双击“Thisworkbook”，出来的窗口上有两个下拉菜单，在第一个里面选择“Workbook”，第二个里面选择“Open”。
代码如下。添加的选项就可以自己写了。
＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝＝
Private Sub Workbook_Open()
With Sheets("sheet1").ComboBox1
.AddItem "1"
.AddItem "2"
.AddItem "3"
End With
End Sub
然后保存这个文件，最好把宏的安全性设置为低，再打开就能看见效果了。

Answer 2

COMBOBOX1.ADDITEM "青菜"
COMBOBOX1.ADDITEM "白菜"