Loop that Deletes Rows

Hi guys,

I've tried executing this with normal excel functions, but it doesn't seem to work for me, so I'm hoping you all could help me out with a VBA code.

The goal is the run a loop on the values in AL:AV in the attached workbook. I'd like the code to search for the first number it finds and then clear the next 10 "days" or rows, then stop the code after it has cleared 10 rows, and again start searching for the next number in that column. As you can see, numbers are sporatically distributed in each column, so I can't just continously run a loop--it needs to be more specific.

Any ideas??