|
Вопрос # 3 450/ вопрос открыт / |
|
Доброго времени суток, уважаемые эксперты!
Подскажите, возможно ли добавить еще одно условие к данному коду кнопки ОК?
Данное условие должно проверять выбранный месяц 14 столбца от начало даты или лучше от начало месяца Cells(i, 27) делая переход на 14 столбец найденной строки If Cells(i, 27).Text = ComboBox1.Text Then
до последней ячейки в низ включительно не зависимо от количества дней (то есть 31 ячейку каждого месяца) на цвет 65535. Условие такое, если есть хоть одна ячейка желтого цвета, то выполняется условие ( после Else), если нет ни одной ячейки желтого цвета, то выходит сообщение MsgBox " Инвентаризация не произведена.", 16, "Запрет ввода"
1.Для примера я поставил заливку ячеек в Октябре и Ноябре месяце.
2. Для того чтобы открыть нужный месяц, его необходимо выбрать из раскрывающегося списка.
3. Я сознательно ввел в Ноябре месяце недостачу (cм. пункты 01. 02. 03. в низу каждого месяца) а в Октябре хоть ячейки и желтые, но ни каких показателей нет, как бы на данном месяце инвентаризация производилась но показание дают 0 , но ввод данных не может быть произведен, так как в силу вступают другие условия кнопки ОК.
Если что не ясно я дополню.
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
 |
Вопрос задал: resseg (статус: Посетитель)
Вопрос отправлен: 27 ноября 2009, 17:47
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|