Search "Total" in all worksheets and delete rows containing "Total"
 

Hello All,
I am new to VBA programming.

I have many worksheets in my excel file.
I want to serach "Total" keyword in all worksheets.
Then delete all the rows containing "Total" Keyword.

Please help me.

Thanks
Mano

--
Message posted from http://www.ExcelForum.com

Search "Total" in all worksheets and delete rows containing "Total"
 

Hi
is the location of this word 'Total' restricted to a specifc column?

--
Regards
Frank Kabel
Frankfurt, Germany


Hello All,
I am new to VBA programming.

I have many worksheets in my excel file.
I want to serach "Total" keyword in all worksheets.
Then delete all the rows containing "Total" Keyword.

Please help me.

Thanks
Manoj


---
Message posted from http://www.ExcelForum.com/

Search "Total" in all worksheets and delete rows containing "Total"
 

Manoj,

This should take care of it for you:

Sub RemoveTotalRows()
For Each tSheet In ActiveWorkbook.Worksheets
Set myTotal = tSheet.Cells.Find("Total")
Do Until myTotal Is Nothing
myTotal.EntireRow.Delete
Set myTotal = tSheet.Cells.Find("Total")
Loop
Next
End Sub

Stan Scott
New York City

"mk_garg20 " wrote in message
...
Hello All,
I am new to VBA programming.

I have many worksheets in my excel file.
I want to serach "Total" keyword in all worksheets.
Then delete all the rows containing "Total" Keyword.

Please help me.

Thanks
Manoj


---
Message posted from http://www.ExcelForum.com/