Question

我正在编写一个If语句来测试我是否在两个组合框中选择了一个选项。正在检查的组合框是从具有两个值的数组生成的。其中一个单元格为空，因此组合框中的顶部值为空。

我的if语句是
数组是

 Private Sub cbApplicationSelection_Change()
   If (eMassWelcome.cbwesitechoose.text = "") Then
   eMassWelcome.cbApplicationSelection.text = ""
   MsgBox "A website has not been selected. Please select a website from the dropdown and try again."
   End If
   Exit Sub
 End Sub

这很有效。

问题是弹出窗口出现了3次，我不知道为什么。我已经尝试了IsNull()和listindex = -1。 IsNull()没有用，列表索引给了我与上面相同的结果。所有这一切都是在excel中使用vba完成的。

Answer 1

您是否为cbApplicationSelection设置了任何更改事件？如果是这样，当您更改它的值时，更改事件也将被触发。

Private Sub cbApplicationSelection_Change()
   If eMassWelcome.cbwesitechoose.text = "" Then
   MsgBox "A website has not been selected. Please select a website from the dropdown and try again."
   End If
 Exit Sub
End Sub

Excel组合框条件If语句检测空白

1 个答案: