Microsoft Office Forums - View Single Post - [Solved] Macro to delete all rows with the word "Total"

Thread: [Solved] Macro to delete all rows with the word "Total"

View Single Post

Old

11-28-2016, 07:50 PM

rajeshn_in rajeshn_in is offline

rajeshn_in is offline

rajeshn_in uses Windows 10

Windows 10 rajeshn_in uses Office 2016

rajeshn_in uses Office 2016

Office 2016

Novice

Join Date: Nov 2016

Posts: 3

rajeshn_in is on a distinguished road

Default

Small correction

change below line

Code:

If Application.CountIf(.Rows(Lrow), "Total") > 0 Then .Rows(Lrow).Delete = True

as

Code:

If Application.CountIf(.Rows(Lrow), "Total") > 0 Then .Rows(Lrow).EntireRow.Delete

Reply With Quote