组合框未显示添加的项目(Excel 2007)

时间:2013-11-18 16:52:23

标签: excel-vba combobox vba excel

我在工作表(Excel 2007)上有一个ActiveX组合框,并根据范围(“X”)中的输入填充组合框。每次Range(“X”)中的输入发生变化时,我都会清除组合框,然后用相关值填充它。下面的代码运行时没有抛出错误,但组合框中没有显示任何项目!我究竟做错了什么?谢谢你的帮助!

Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("X")) Is Nothing Then
        RiskCombo.Clear
        RiskCombo.Enabled = True
        RiskCombo.AddItem 1  ' these values depends on value in Range("X")
        RiskCombo.AddItem 2
        RiskCombo.AddItem 3
    End If
End Sub

如果删除此行,代码可以正常工作 -

RiskCombo.Clear

但是我必须清除组合框,否则项目列表将包含不相关的项目。

0 个答案:

没有答案