请教,Excel2003中,如何在VBA中使用列表框或组合框?
当点击下拉按钮时,显示出当前工作表某一列的数据。选择某一个值后可以将它赋值到一个变量中。非常感谢大家。已经解决。...
当点击下拉按钮时,显示出当前工作表某一列的数据。选择某一个值后可以将它赋值到一个变量中。非常感谢大家。
已经解决。 展开
已经解决。 展开
1个回答
展开全部
Private Sub ComboBox1_Change()
Dim A
A = ComboBox1.Text '赋值给变量
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
ComboBox1.Clear
For I = 1 To UsedRange.Rows.Count
ComboBox1.AddItem Range("A" & I).Value '添加到combox
Next
ComboBox1.ListIndex = 0 '选中第一项
End Sub
Dim A
A = ComboBox1.Text '赋值给变量
End Sub
Private Sub ComboBox1_GotFocus()
Dim I As Long
ComboBox1.Clear
For I = 1 To UsedRange.Rows.Count
ComboBox1.AddItem Range("A" & I).Value '添加到combox
Next
ComboBox1.ListIndex = 0 '选中第一项
End Sub
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询