Если тогда утверждение в vba

У меня есть следующий код:

If Label1 = 0 Then btn1.Enabled = False ElseIf Label2 = 0 Then btn2.Enabled = False ElseIf Label3 = 0 Then btn3.Enabled = False ElseIf Label4 = 0 Then btn4.Enabled = False End If End If End If End Sub 

Прямо сейчас, когда он запускается после условия ios true, он заканчивает sub. Я хочу, чтобы все условия выполнялись правильно. Итак, прямо сейчас, если Label2 = 0, кнопка отключена и программа заканчивается. Я хочу, чтобы он продолжал проверять остальные ярлыки. Я уверен, что это вопрос else / If Then.

Вам не нужны ElseIfs.

Если вы хотите протестировать все условия, проверьте их отдельно

 If Label1 = 0 Then btn1.Enabled = False End If If Label2 = 0 Then btn2.Enabled = False End If If Label3 = 0 Then btn3.Enabled = False End If If Label4 = 0 Then btn4.Enabled = False End If 

Только для того, чтобы листинг, вот еще одна возможность:

 btn1.Enabled = (Label1 <> 0) btn2.Enabled = (Label2 <> 0) btn3.Enabled = (Label3 <> 0) btn4.Enabled = (Label4 <> 0) 

Только один из них произойдет, если вы используете условный блок If-Else If (это будет первый, который является истинным). Если вы хотите, чтобы каждый из них произошел, используйте 4 отдельных условных оператора IF.

Не используйте ElseIf : используйте Separate If/Then/End If структуры для всех меток.

Вы должны изменить свой код на:

 If Label1 = 0 Then btn1.Enabled = False If Label2 = 0 Then btn2.Enabled = False If Label3 = 0 Then btn3.Enabled = False If Label4 = 0 Then btn4.Enabled = False End Sub 
Interesting Posts

c # Словарь <строка, список <данные >> данные в csv или excel

формула excel для чтения из энергозависимой функции?

Excel VBA, который использует вложенные операторы If для нескольких листов

Скопируйте непустую ячейку в ячейку ниже, повторите для каждой пустой ячейки

Как вводить целое число в час в ячейку с форматированием «hh: mm»

Вставка строк в таблицу Excel с использованием LabVIEW

автоматически отображать «пожалуйста, введите текст здесь» в определенной ячейке

Условное формирование VBA с цветовой гаммой

запустить макрос VBA при изменении переменной модуля

Метод ComboBox.Dropdown показывает только один элемент списка

Excel для поиска нескольких URL-адресов в одном столбце

Макросборка, чтобы выбрать одну ячейку, если соответствуют две другие ячейки

Вызов макроса Excel из Outlook 16

Настройка увеличения без выбора в Excel VBA

Установите количество копий на лист

Давайте будем гением компьютера.