From 78b5099d832746152c103f6dbff887ec09610af4 Mon Sep 17 00:00:00 2001 From: QaruzDin Date: Wed, 24 Jul 2024 21:40:17 +0700 Subject: [PATCH] delete duplicate block code --- DelCellAutomationV1.bas | 3 --- 1 file changed, 3 deletions(-) diff --git a/DelCellAutomationV1.bas b/DelCellAutomationV1.bas index 59b8ea7..d5ae784 100644 --- a/DelCellAutomationV1.bas +++ b/DelCellAutomationV1.bas @@ -80,9 +80,6 @@ Public Sub Del_Cell_Automation() ElseIf cell.Interior.Color <> RGB(255, 255, 255) Then cell.EntireRow.Delete i = i - 1 - ElseIf cell.Interior.Color <> RGB(255, 255, 255) Then - cell.EntireRow.Delete - i = i - 1 ' Here! You can add more conditions as needed in this block of FOR loop