Range("A1").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
--
HTH
Bob
(there's no email, no snail mail, but somewhere should be gmail in my addy)
"Curt D." <(E-Mail Removed)> wrote in message
news:3E6A09E8-DB81-4FDB-8AFA-(E-Mail Removed)...
>I have some data that I am trying to use the sumproduct formula on but I
>keep
> getting the VALUE! code unless I delete the next 700 or so rows that have
> no
> data in them. The number of rows with data changes so I can not just look
> at
> certain number of rows. Does anyone have a way in VBA to select the first
> emoty row and the next 700 rows (approx) and then delete them? Thanks in
> Advance for the help.
|