Clearing rows after autofiltering
 

Hi

I have recorded a macro to copy the data from 1 sheet to another and then
autofilter the data on sheet 1 of all rows with any value in column 8 and
sheet 2 to autofilter the data of blank rows in column 8

works good
I however would like to be able to clear the contents (rows) i don't need
from sheet 1 to keep the size of the sheet down

any help would be appreciated

heres my macro

Sheets("Filled Requests").Select
Sheets("Panel Orders").Range("B6:I90").AdvancedFilter Action:=xlFilterCopy _
, CriteriaRange:=Sheets("Panel Orders").Range("B6:I90"), CopyToRange:= _
Range("B6:I90"), Unique:=False
Sheets("Panel Orders").Select
Range("B6:I90").Select
Selection.AutoFilter
Selection.AutoFilter Field:=8, Criteria1:="<"
Selection.AutoFilter Field:=8, Criteria1:="="
Sheets("Filled Requests").Select
Range("B6:I25000").Select
Selection.AutoFilter
Selection.AutoFilter Field:=8, Criteria1:="<"