Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.10.2021, 09:41   #1
DMITRIY_78
Форумчанин
 
Регистрация: 11.12.2018
Сообщений: 202
По умолчанию условия для нескольких зависимых значений

Ребята Здравствуйте! помогите макросом, в формуле могу реализовать несколько операторов И и ИЛИ, а вот на макросе туговато при чем в массиве, пример приложил, думаю из примера будет понятно, детально пояснения в ходе обсуждения
Вложения
Тип файла: rar пример.rar (15.8 Кб, 4 просмотров)
Что нас не убивает, то делает нас сильными!
Всё гениальное просто, всё простое гениально!
DMITRIY_78 вне форума Ответить с цитированием
Старый 30.10.2021, 10:20   #2
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

На листе нету формул. Самому надо угадать и в Диспетчер имен залезть?
Изображения
Тип файла: jpg Screenshot_1.jpg (81.9 Кб, 2 просмотров)
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 30.10.2021, 10:46   #3
DMITRIY_78
Форумчанин
 
Регистрация: 11.12.2018
Сообщений: 202
По умолчанию

Aleksandr H., на листе и не должно быть формулы
Цитата:
Сообщение от DMITRIY_78 Посмотреть сообщение
в формуле могу реализовать несколько операторов
Цитата:
Сообщение от DMITRIY_78 Посмотреть сообщение
а вот на макросе туговато при чем в массиве
подробнее: макросом реализовать закрашивание ячеек из диапазона (C2:D37) по условию,
Код:
=И($C2="";$D2="СЦ") - а здесь хотелось бы увидеть макрос условия
cell.Interior.ColorIndex = 6 ' макрос цвета
- формула из условного форматирования
на что ума хватило пример макроас в книге
Что нас не убивает, то делает нас сильными!
Всё гениальное просто, всё простое гениально!

Последний раз редактировалось DMITRIY_78; 30.10.2021 в 10:48.
DMITRIY_78 вне форума Ответить с цитированием
Старый 30.10.2021, 11:14   #4
Aleksandr H.
2 the Nation Glory
Старожил
 
Аватар для Aleksandr H.
 
Регистрация: 27.05.2014
Сообщений: 3,289
По умолчанию

Код:
Sub var3()
    Dim c
    Dim d
    With ActiveSheet
        For i = 2 To 37
            d = LCase(Trim$(.Cells(i, "D").Value2))
            c = LCase(Trim$(.Cells(i, "C").Value2))
            
            If c = LCase("Ашан") And d = LCase("СЦ") Then
                .Cells(i, "C").Resize(1, 2).Interior.ColorIndex = 6
            Else
                .Cells(i, "C").Resize(1, 2).Interior.ColorIndex = xlNone
            End If
        Next i
    End With
End Sub
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы.
Aleksandr H. вне форума Ответить с цитированием
Старый 30.10.2021, 11:35   #5
DMITRIY_78
Форумчанин
 
Регистрация: 11.12.2018
Сообщений: 202
По умолчанию

Aleksandr H., где кнопошка поставить плюсик, СПАСИБО !
Что нас не убивает, то делает нас сильными!
Всё гениальное просто, всё простое гениально!
DMITRIY_78 вне форума Ответить с цитированием
Старый 31.10.2021, 10:10   #6
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,550
По умолчанию

Цитата:
Сообщение от DMITRIY_78 Посмотреть сообщение
Aleksandr H., где кнопошка поставить плюсик
В этом форуме - отменены плюсики (и минусики тоже). Полное равенство - и кто дельные советы даёт, и кто БСК* несёт. Демократия
------------------------
* БСК - бред сивой кобылы
digitalis вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Какие задать условия для обработки нескольких значений? KaizerSX Общие вопросы по Java, Java SE, Kotlin 1 06.11.2017 18:40
Формула для нескольких значений в одной ячейке ексель myr Microsoft Office Excel 4 16.11.2016 14:29
Вычисление значений функции для нескольких значений аргументов и параметров kolychii Помощь студентам 0 08.10.2012 15:49
испоьзуая програмный модуль вычислить сумму или произведение для нескольких значений х Eloise Фриланс 7 10.12.2011 19:39
Экспорт значений из нескольких документов Word в одну таблицу Excel для дальнейших расчетов. YJYNGK Microsoft Office Excel 0 30.10.2010 13:42