Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Вопросы по Microsoft Excel
Страницы: 1
RSS
Вопрос касательно цикла IF Else IF VBA, Не могу найти свою ошибку
 
#1
16.03.2015 14:43:58
Здравствуйте уважаемые знатоки !
Пишу простенький код вот такой:
Код
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 "Ничего"
Не подскажете где я ошибаюсь?
Спасибо большое всем заранее.

С уважением, Самир
Power Query, Power Pivot, Power BI и MS Excel спасут мир
 
 
 
#2
16.03.2015 15:06:16
Советую изучить справку по 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
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#3
16.03.2015 15:10:51
Большое спасибо The_Prist ! Сейчас все стало ясно!
Power Query, Power Pivot, Power BI и MS Excel спасут мир
 
 
 
#4
04.03.2021 18:19:20
Здравствуйте. Подскажите  пожалуйста. Где моя ошибка?
 
 
 
#5
04.03.2021 18:42:58
В лишних пробелах в началах строк, видимо. Иначе строки не выделялись бы красным.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
 
 
 
#6
04.03.2021 19:01:23
Благодарю за помощь.
 
 
 
#7
04.03.2021 19:40:55
Studying У вас ошибка в названии процедуры она одинакова с переменной в процедуре.
Изучаете Профессиональное программирование на VBA в Excel 2003
 
 
 
#8
04.03.2021 20:34:12
Studying,
ничего не читайте, исправьте Elself на ElseIf
читайте по губах: ElseLF на ElseIF
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!
 
 
 
Страницы: 1
Наверх