Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Проверка условия, действие по условию if - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Проверка условия, действие по условию if (Макросы/Sub)
Проверка условия, действие по условию if
nwabws Дата: Четверг, 01.09.2016, 18:33 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день!
Прошу вас помочь перевести нижеследующую задачу на проверку if

Дано:
2 водопроводных крана и табличка с колонками "номер крана", "давление
(есть две ячейки со значениями  состояния крана получаемые из вне.)
Вкл./выкл = 1/0 (значение меняется в одной и той же ячейке
"B4" = 1 (Вкл.)  - 1й кран
"B5" = 0 (Выкл.) -2й кран
"F4" = "1" ("номер крана")

Задание
Если 1й кран Включен(B4=1), то "номер крана" = 1
Если 2й кран Включен(B5=1), то "номер крана" = 2
Если оба крана работают, (B4:B5=1) то ячейка в столбце "номер крана" = 1/2
Если оба крана НЕ работают, (B4:B5=0) то ячейка в столбце "номер крана" = "-"
Не могу сообразить, как это правильно записать в макрос.

http://www.planetaexcel.ru/forum....e681046
К сообщению приложен файл: 7613320.xlsm(15Kb)


Сообщение отредактировал nwabws - Пятница, 02.09.2016, 14:41
 
Ответить
СообщениеДобрый день!
Прошу вас помочь перевести нижеследующую задачу на проверку if

Дано:
2 водопроводных крана и табличка с колонками "номер крана", "давление
(есть две ячейки со значениями  состояния крана получаемые из вне.)
Вкл./выкл = 1/0 (значение меняется в одной и той же ячейке
"B4" = 1 (Вкл.)  - 1й кран
"B5" = 0 (Выкл.) -2й кран
"F4" = "1" ("номер крана")

Задание
Если 1й кран Включен(B4=1), то "номер крана" = 1
Если 2й кран Включен(B5=1), то "номер крана" = 2
Если оба крана работают, (B4:B5=1) то ячейка в столбце "номер крана" = 1/2
Если оба крана НЕ работают, (B4:B5=0) то ячейка в столбце "номер крана" = "-"
Не могу сообразить, как это правильно записать в макрос.

http://www.planetaexcel.ru/forum....e681046

Автор - nwabws
Дата добавления - 01.09.2016 в 18:33
Pelena Дата: Четверг, 01.09.2016, 18:46 | Сообщение № 2
Группа: Модераторы
Ранг: Экселист
Сообщений: 9869
Репутация: 2263 ±
Замечаний: 0% ±

Excel 2010 & Mac Excel 2011
Файл 0 Кб


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеФайл 0 Кб

Автор - Pelena
Дата добавления - 01.09.2016 в 18:46
Nic70y Дата: Четверг, 01.09.2016, 18:51 | Сообщение № 3
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3484
Репутация: 722 ±
Замечаний: 0% ±

Excel 2013
файл поврежден
[vba]
Код
If [b4] = 1 And [b5] = 0 Then [f4] = 1
If [b4] = 0 And [b5] = 1 Then [f4] = 2
If [b4] = 1 And [b5] = 1 Then [f4] = "'1/2"
If [b4] = 0 And [b5] = 0 Then [f4] = "-"
[/vba]


ЯД(poison) 41001841029809
+7 978 049 98 74 (мтс)
 
Ответить
Сообщениефайл поврежден
[vba]
Код
If [b4] = 1 And [b5] = 0 Then [f4] = 1
If [b4] = 0 And [b5] = 1 Then [f4] = 2
If [b4] = 1 And [b5] = 1 Then [f4] = "'1/2"
If [b4] = 0 And [b5] = 0 Then [f4] = "-"
[/vba]

Автор - Nic70y
Дата добавления - 01.09.2016 в 18:51
KuklP Дата: Четверг, 01.09.2016, 21:45 | Сообщение № 4
Группа: Проверенные
Ранг: Старожил
Сообщений: 2006
Репутация: 436 ±
Замечаний: 20% ±

Erase


Ну, с НДС и мы чего-то стoим! kuklp@mail.ru
WM Z206653985942, R334086032478, U238399322728


Сообщение отредактировал KuklP - Пятница, 02.09.2016, 14:32
 
Ответить
СообщениеErase

Автор - KuklP
Дата добавления - 01.09.2016 в 21:45
nwabws Дата: Пятница, 02.09.2016, 14:09 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 15
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
KuklP,
К сообщению приложен файл: 3457049.xlsm(15Kb)
 
Ответить
СообщениеKuklP,

Автор - nwabws
Дата добавления - 02.09.2016 в 14:09
KuklP Дата: Пятница, 02.09.2016, 14:23 | Сообщение № 6
Группа: Проверенные
Ранг: Старожил
Сообщений: 2006
Репутация: 436 ±
Замечаний: 20% ±

Кросс, удалил свое решение:
http://www.planetaexcel.ru/forum....sloviyu


Ну, с НДС и мы чего-то стoим! kuklp@mail.ru
WM Z206653985942, R334086032478, U238399322728


Сообщение отредактировал KuklP - Пятница, 02.09.2016, 14:31
 
Ответить
СообщениеКросс, удалил свое решение:
http://www.planetaexcel.ru/forum....sloviyu

Автор - KuklP
Дата добавления - 02.09.2016 в 14:23
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Проверка условия, действие по условию if (Макросы/Sub)
Страница 1 из 11
Поиск:

Яндекс цитирования
© 2010-2016 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!