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