L
Liketoknow
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:="<>"
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:="<>"