Excell cannot complete error then Run-time error 1004 delete method of range class failed

I am using a macro that creates a copy of a specific tab, then on the new tab it deletes rows that have nothing in a specific range of cells.

When I run the macro today, I first get the excel error Excel cannot complete this task with available resources... when I select OK I get the macro error Run-time error '1004': Delete method of range class failed. I have been using this macro for a while with no problems and have not made any changes to the macro.

here is the macro:

Please Login or Register  to view this content.

The macro works fine at the beginning but when it gets to "Set rng = Range("h2:h" & LastRow)" and starts looping thru the rng it errors out when it gets to the first row with "". When I debug the line that it stops on is "rng.Cells(i).EntireRow.Delete".

What is the problem? Any and all help is great.

You set the value for LastRow on the Journal Import sheet, but when you copy that sheet you're now on the new activesheet. I've taken a stab at cleaning up your code; see if this works any better for you.

Please Login or Register  to view this content.