If语句带有combobox.value的问题(无效使用Me关键字)

时间:2019-06-13 06:45:39

标签: excel vba if-statement combobox commandbutton

我对If语句有疑问。我在工作表上有一个ActiveX命令按钮,该按钮应打开六个用户窗体之一,具体取决于组合框的值。

有6个用户窗体,以及一个带有6个值可供选择的组合框(用户窗体的名称)

我尝试设置代码-me.combobox.value =“ ..”-不起作用... 用工作表名称设置代码-Menu.combobox.value =“ ..”-一样。.

Private Sub CommandButton1_Click()  

    If Me.ComboBox1.Value = "Greenhouse I" Then
     Greenhouse1.Show
    ElseIf Me.ComboBox1.Value = "Greenhouse II" Then
     Greenhouse2.Show
    ElseIf Me.ComboBox1.Value = "Greenhouse III" Then
     Greenhouse3.Show
    ElseIf Me.ComboBox1.Value = "Greenhouse IV" Then
     Greenhouse4.Show
    ElseIf Me.ComboBox1.Value = "Greenhouse V" Then
     Greenhouse5.Show
    ElseIf Me.ComboBox1.Value = "Greenhouse VI" Then
     Greenhouse6.Show

    End If
End Sub

我需要它,单击一个按钮将打开适当的UserForm,具体取决于ComboBox的值

0 个答案:

没有答案