deleting select rows

Hi,

I know deleting select rows is a very common problem and i could find many sample programs online. However i wrote a simple one that imitates those programs and its acting funny. The macro is attached to a button and all it does is check if a certain column has the value zero and deletes it. However it only deletes some of those rows. Hitting the button a couple of times eventually deletes all the rows. So what do you think is wrong with my script? I'm new to vba on excel but im quite familiar with a couple of other scripting languages and this is acting very funny.

My script is

Please Login or Register  to view this content.

and the workbook is BOQ 12 R2.xlsm

please help me on getting it to work. I wrote another script that automates the whole workbook process but it gives me a weird 1004 error time to time. and i couldnt find an explanation to this anywhere..

thanks in advance

Please Login or Register  to view this content.