Цитата irakitin2014 (

)
ну как то так, может бытьпросто нажать кнопку
Прикрепления: 0422618.xlsm(25.3 Kb)
Спасибо друг, щас разберусь. +реп)Добавлено (06.06.2019, 10:41)
---------------------------------------------
Цитата irakitin2014 (

)
For ii = LatRow To 1 Step -1 If Cells(ii, 2) = krit1 Or Cells(ii, 2) = krit2 Then
Range(Cells(ii, 1), Cells(ii, 2)).Delete Shift:=xlUp
End If
Next
Все работает, с небольшими неточностями, удаляет конкретно строки где работал ненужный менеджер, а необходимо удалить целиком фирму если ненужный менеджер с ней работал. Твой код очень помог, я думаю перед удалением строки нужно вставить цикл где он проверит весь список и удалит по условию. Еще раз спасибо, очень помог, я думаю я справлюсь)