Игнорировать пустые ячейки в операторе IF, использующем «И» - PullRequest
0 голосов
/ 03 мая 2018

В настоящее время у меня есть скрипт ниже для поиска по 4 значениям ячеек. Он удаляет все строки, которые содержат все значения выше 10. Однако я борюсь с добавлением вложенного оператора «IF» для игнорирования пробелов.

Sub test()

For i = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1
    If Cells(i, "C").Value2 >= 10 And Cells(i, "D").Value2 >= 10 And Cells(i, "E").Value2 >= 10 And Cells(i, "F").Value2 >= 10 Then
        Rows(i).Delete
    End If
Next i

End Sub

1 Ответ

0 голосов
/ 03 мая 2018

Суб тест ()

Range("C:F" & LastRow).Replace "", "999", xlWhole

For i = Cells(Rows.Count, "A").End(xlUp).Row To 2 Step -1
    If Cells(i, "C").Value2 >= 10 And Cells(i, "D").Value2 >= 10 And Cells(i, "E").Value2 >= 10 And Cells(i, "F").Value2 >= 10 Then
        Rows(i).Delete
    End If
Next i

Range("C:F" & LastRow).Replace "999", "", xlWhole


End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...