我有一个带有3个组合框的用户窗体和一个命令按钮,当单击该按钮时,将输入的值放入工作表中。对于所有3,我将MatchRequired设置为True,以便无法输入其他值。
我的问题是我可以毫无问题地通过每个组合框,因为没有任何不准确之处。但是,当我单击命令按钮时,出现无效属性值错误。此外 - 即使出现错误,该条目仍会添加到工作表中。是什么给了什么?
我正在同一张纸上的不同列中加载组合框选项。这是我对命令按钮的代码:
Private Sub cmdAddClass_Click()
Dim RowCount As Long
RowCount = Worksheets("Sheet2").Range("A1").CurrentRegion.Rows.Count
With Worksheets("Sheet2").Range("A1")
.Offset(RowCount, 0).Value = Me.cboGrade.Value
.Offset(RowCount, 1).Value = Me.cboUnits.Value
.Offset(RowCount, 2).Value = Me.cboQuarter.Value
End With
Me.cboGrade.Value = ""
Me.cboUnits.Value = ""
Me.cboQuarter.Value = ""
Me.cboGrade.SetFocus
End Sub
新来的,所以感谢您的帮助。
答案 0 :(得分:1)
你的问题是:
hr.addView(layout);
您将Me.cboGrade.Value = ""
'...
Me.cboGrade.SetFocus
设置为空白,这不是组合框列表中的值。因此,当您将焦点设置为cboGrade
时,cboGrade
设置会拒绝该焦点并发出MatchRequired
消息。请注意,这实际上不是VBA错误,而是来自表单控件的消息。
尝试删除Invalid Property Value