首页 > 解决方案 > 活动组合框的 VBA RemoveItem 未指定错误

问题描述

我收到以下错误:

“运行时错误‘-2147467259 (800040005)’:

未指定的错误。

运行以下代码时:

For Each cCont In Me.Controls
    If TypeName(cCont) = "ComboBox" Then
        Do While cCont.ListCount > 0 'Clear the list first
            'cCont.Selected = False
            'cCont.RowSourceType = Value
            cCont.RemoveItem (0)
        Loop
    End If
Next cCont

这被放置在用户表单的通用代码部分中。这样做的目的是删除之前由字段值更改触发的 sub 添加的项目。

此代码适用于同一用户窗体中的其他 ComboBox,但是当它到达我的文本光标所在的 ComboBox 时会引发错误。

我已经检查了 RowSource = "" 。我不确定还能尝试什么。下面是发生错误时与 ComboBox 关联的值的图像:

在此处输入图像描述

标签: excelvba

解决方案


推荐阅读