Deleteing Rows
Amber,
Here's some simple code that will delete any rows with 'Result' in column A
Application.ScreenUpdating = False
With ActiveWorkbook
With .ActiveSheet
.Rows(1).Insert
.Range("A1").Value = "Test"
.Columns("A:A").AutoFilter Field:=1, Criteria1:="result"
.Cells.SpecialCells(xlCellTypeVisible).EntireRow.D elete
End With
End With
Application.ScreenUpdating = True
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"Amber" wrote in message
...
In my spreadsheet I have yellow lines that say result. I want to delete
these lines. How would I do this?
|