Добрый день подскажите какой оператор последовательно выполняет одно условие за другим больше двух использую ElseIf выполняет только до 3 условия но 3 уже не выполняет, даже если условия вступает в силу , и подскажите как сделать по строчную проверку условий плииз ) Благодарю
Добрый день подскажите какой оператор последовательно выполняет одно условие за другим больше двух использую ElseIf выполняет только до 3 условия но 3 уже не выполняет, даже если условия вступает в силу , и подскажите как сделать по строчную проверку условий плииз ) БлагодарюElhust
If Cells(4, 3) < 0.1 Then Scorepoint2 = 41 ElseIf 0.1 <= Cells(4, 3) < 0.28 Then Scorepoint2 = 44 ElseIf 0.28 <= Cells(4, 3) < 0.41 Then Scorepoint2 = 47 ElseIf 0.41 <= Cells(4, 3) < 0.51 Then Scorepoint2 = 61 ElseIf 0.51 <= Cells(4, 3) And Cells(4, 3) > 0.51 Then Scorepoint2 = 72 End If не работает а как select case сделать я не знаю
If Cells(4, 3) < 0.1 Then Scorepoint2 = 41 ElseIf 0.1 <= Cells(4, 3) < 0.28 Then Scorepoint2 = 44 ElseIf 0.28 <= Cells(4, 3) < 0.41 Then Scorepoint2 = 47 ElseIf 0.41 <= Cells(4, 3) < 0.51 Then Scorepoint2 = 61 ElseIf 0.51 <= Cells(4, 3) And Cells(4, 3) > 0.51 Then Scorepoint2 = 72 End If не работает а как select case сделать я не знаюElhust
прекрасно работает. но тогда вам [url=https://msdn.microsoft.com/en-us/library/office/gg278665(v=office.15).aspx]сюда[/url] за select CASE видимо ну или консрукцию удыуша не использовать а просто else : if
Теперь понятно. используйте логический AND или OR типа if 2 > 1 and 2 < 3 then .. Cells(4, 3) >= 0.1 and Cells(4, 3) < 0.28 . когда 1< 6 < 5 то логика будет такая 1<6 истина, что равно 1. 1 <5 тоже истина. а значит все истина.
Elhust, Не замечал такого поведения elseif [vba]
Код
Sub test() If 5 < 1 Then
ElseIf 5 < 2 Then
ElseIf 5 < 3 Then
ElseIf 5 < 4 Then
ElseIf 5 < 5 Then
ElseIf 5 < 6 Then Debug.Print 6 End If End Sub
[/vba]
прекрасно работает. но тогда вам [url=https://msdn.microsoft.com/en-us/library/office/gg278665(v=office.15).aspx]сюда[/url] за select CASE видимо ну или консрукцию удыуша не использовать а просто else : if
Теперь понятно. используйте логический AND или OR типа if 2 > 1 and 2 < 3 then .. Cells(4, 3) >= 0.1 and Cells(4, 3) < 0.28 . когда 1< 6 < 5 то логика будет такая 1<6 истина, что равно 1. 1 <5 тоже истина. а значит все истина.bmv98rus
Замечательный Временно просто медведь , процентов на 20.
Сообщение отредактировал bmv98rus - Пятница, 13.01.2017, 09:49
bmv98rus, Сорян за беспокойство но мне бы ещё сделать так чтобы он проверял определённое количество строчек или просто до конца листа все строчки ... (
bmv98rus, Сорян за беспокойство но мне бы ещё сделать так чтобы он проверял определённое количество строчек или просто до конца листа все строчки ... (Elhust
Вход
Регистрация
Напомнить пароль
Автосумма
Часто используемые
ВПР
ЕСЛИ
СУММЕСЛИ
Финансовые
Логические
Текстовые
Даты и времени 
Ссылки и массивы 
Математические
Другие функции
Проверка свойств и значений
Баз данных
Математические
Обработки массивов
Обработки строк
Преобразования типов данных 
Загрузки данных
Работы с файлами
Обработки системных параметров
Обработки цвета
Работы с датами и временем
Преобразования в системы счисления
Финансовые
