Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Вопрос касательно цикла IF Else IF VBA, Не могу найти свою ошибку
 
Здравствуйте уважаемые знатоки !
Пишу простенький код вот такой:
Код
If Range("A1").Value = 5 Then
Range("A2").Value = 55
ElseIf Range("A1").Value =  4
Then Range("A2").Value = 44
Else:
MsgBox "Ничего"
Этот код не работает. Но стоит перенести выражения которые идут после слова Then на новую строку то код работает правильно:
Код
If Range("A1").Value = 5 Then 
Range("A2").Value = 55

ElseIf Range("A1").Value =  4 Then 
Range("A2").Value = 44
Else:
MsgBox "Ничего"
Не подскажете где я ошибаюсь?
Спасибо большое всем заранее.

С уважением, Самир
Я люблю Excel
 
Советую изучить справку по If ... Then
В первом случае у Вас после Then идет сразу строка, которая должна выполняться при истинности условия If. В этом случае Else либо должно быть на той же строке после =55, либо не должно быть вообще. End if - вообще не должно быть.
Либо располагайте каждое условие в разных строках, не забывая закрывать их через End If:
Код
If Range("A1").Value>0 then
'
elseif Range("A1").Value>0 then
'
else
'
end if
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
Большое спасибо The_Prist ! Сейчас все стало ясно!
Я люблю Excel
Страницы: 1
Читают тему (гостей: 1)