Deleting results of an AutoFilter excluding top row

S

Shirley Munro

Hi

I am recording a macro which performs a series of task. One of these
tasks is to filter out all the cells which are blank in column C. Once
the filter has been applied, I want to delete all the rows containing
blanks in column C with the exception of row A which contains my
headings.

Any suggestions would be much appreciated.

Shirley Munro
 
B

Bob Phillips

Before the filter set a range like so

Set rng = Range(Range("A2"), Cells(Rows.Count,"A").End(xlUp))

then after the filter, do

rng.SpecialCells(xlCellTypeVisible).Delete

--
HTH

Bob Phillips

(remove nothere from email address if mailing direct)

"Shirley Munro" <[email protected]>
wrote in message
news:[email protected]...
 
Top