delete entire row based on if then value

[duwell81]

Good Evening,

I have an excel spreadsheet that has 7217 rows and some of the rows in column b have a value of "True" based on an if then statement i used to check for blanks in column c. I simply want to delete the entire row if the value in column b is equal to "True" without having to sort the database on column B which would probaly be easier but i want to leave my data order in tact right now.

Any Help would be great.

 

[rpaulson]

try this in a backup of you data.

Sub DeleteRows()
'This macro will delete the entire row if there is a data match anywhere in the range.
    Application.ScreenUpdating = False

    With Range("B1:B200")
        .Replace "True", True, xlWhole ' can also use *John* if searching for any part
        .SpecialCells(xlCellTypeConstants, 4).EntireRow.Delete
    End With

    Application.ScreenUpdating = True

End Sub

 

[p45cal]

Autofilter, filter for true in column B, select the range or rows, press delete on the keyboard or right-click and choose delete (to remove the cells too), remove the Autofilter.

 

[duwell81]

Autofilter, filter for true in column B, select the range or rows, press delete on the keyboard or right-click and choose delete (to remove the cells too), remove the Autofilter.

Thx for the help. worked great

 

[duwell81]

Tried your Code and it worked great. Thx.