Добрый день!
Суть проблемы : хочу написать код, который будет похож на функцию ЕСЛИ(И ( в Excel ,
Попытаюсь расписать : 1)В столбце K есть 2 типа данных : пусто и * 2) в столбце H все ячейки заполнены фамилиями сотрудников 3) В столбце G указаны KPI (которые повторяются периодически) .
Нужно : чтобы столбец К проверялся на наличие * и после соответствия выполнялось следующие : ЕСЛИ К (какая то ячейка)содержит * И H(такая же ячейка) содержит "Putov " и G (такая же ячейка) Содержит слово "LTE" , Тогда надо написать определенный текст . Если ячейка содержит * но остальные условия не выполняются , то вернуть звездочку .
Что я делаю :
Но VBA выдает ошибку
Суть проблемы : хочу написать код, который будет похож на функцию ЕСЛИ(И ( в Excel ,
Попытаюсь расписать : 1)В столбце K есть 2 типа данных : пусто и * 2) в столбце H все ячейки заполнены фамилиями сотрудников 3) В столбце G указаны KPI (которые повторяются периодически) .
Нужно : чтобы столбец К проверялся на наличие * и после соответствия выполнялось следующие : ЕСЛИ К (какая то ячейка)содержит * И H(такая же ячейка) содержит "Putov " и G (такая же ячейка) Содержит слово "LTE" , Тогда надо написать определенный текст . Если ячейка содержит * но остальные условия не выполняются , то вернуть звездочку .
Что я делаю :
Код |
---|
Sub fdsf() Dim cellChecked As Range Dim KPI As Range Dim Response As Range For Each KPI In Range("G2:G3342") For Each Response In Range("H2:H3342") For Each cellChecked In Range("K2:K3342") If cellChecked = "*" And KPI = "ANYWORD" And Response = "Putov" Then cellChecked = "LTE" Else cellChecked = "*" End If Next cellChecked End Sub |