Проблема с оператором If с combobox.value (неправильное использование ключевого слова Me) - PullRequest
Новая
       31

Проблема с оператором If с combobox.value (неправильное использование ключевого слова Me)

0 голосов
/ 13 июня 2019

У меня проблема с оператором 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

Мне нужно, щелчок по кнопке откроет соответствующую пользовательскую форму, в зависимости от значения ComboBox

...