Stormy |
Дата: Пятница, 28.02.2014, 17:12 |
Сообщение № 1 |
|
Группа: Проверенные
Ранг: Обитатель
Сообщений: 366
Репутация:
12
±
Замечаний:
0% ±
 Excel 2010 | |
Доброго времени суток! Есть формула в Excel Код =ЕСЛИ(O19="m²";ЕСЛИ(L19*M19/1000000<0,5;"<0,5 m²";"=>0,5 m²");O19) Хочу написать в VBA L19 = TextBox4 M19 = TextBox4 O19 = Label12
Пытаюсь сделать таким образом
[vba]Код iif(Me.Label12="m" &ChrW(178),iif(Round((Me.TextBox3 * Me.TextBox4 / 1000000)< 0.5,"<0,5 & ChrW(178)","=>0.5 & ChrW(178)"), Me.Label12 ) [/vba] Выдает ошибку компиляции. Подскажите, пожалуйста, что тут не так?
Доброго времени суток! Есть формула в Excel Код =ЕСЛИ(O19="m²";ЕСЛИ(L19*M19/1000000<0,5;"<0,5 m²";"=>0,5 m²");O19) Хочу написать в VBA L19 = TextBox4 M19 = TextBox4 O19 = Label12
Пытаюсь сделать таким образом
[vba]Код iif(Me.Label12="m" &ChrW(178),iif(Round((Me.TextBox3 * Me.TextBox4 / 1000000)< 0.5,"<0,5 & ChrW(178)","=>0.5 & ChrW(178)"), Me.Label12 ) [/vba] Выдает ошибку компиляции. Подскажите, пожалуйста, что тут не так?Stormy
Место для рекламы.
|
|
| Ответить
|
nilem |
Дата: Пятница, 28.02.2014, 17:20 |
Сообщение № 2 |
|
Группа: Авторы
Ранг: Старожил
Сообщений: 1613
Репутация:
563
±
Замечаний:
0% ±
 Excel 2013, 2016 | |
Попробуйте обычный If ... Then Else ElseIf End If (кстати работает быстрее, чем Iif, если правильно расположить условия) или Select Case
Попробуйте обычный If ... Then Else ElseIf End If (кстати работает быстрее, чем Iif, если правильно расположить условия) или Select Casenilem
Яндекс.Деньги 4100159601573
|
|
| Ответить
|
Stormy |
Дата: Пятница, 28.02.2014, 17:22 |
Сообщение № 3 |
|
Группа: Проверенные
Ранг: Обитатель
Сообщений: 366
Репутация:
12
±
Замечаний:
0% ±
 Excel 2010 | |
nilem, Про Select Case совсем забыл . Буду им пробовать.
nilem, Про Select Case совсем забыл . Буду им пробовать.Stormy
Место для рекламы.
|
|
| Ответить
|