--One way is to clearcontents rather than deleting the row. But you will have
to clearcontents for the cells without formulas and end of the macro you will
need to sort the range to bring the records together

--Another way is to recreate or copy the formats using pastespecial and fill
formulas into new rows to keep that to 1000.

If this post helps click Yes
---------------
Jacob Skaria


"Jock" wrote:

A worksheet has 1000 formatted rows some of which contain formulae.
A macro will remove entire rows when certain criteria is met and paste to a
different sheet.
When this happens, the number of formatted rows decreases in number by the
same amount that have been moved.
How can I ensure that I always have 1000 rows regardless of how many rows
are removed?
--
Traa Dy Liooar

Jock