need to loop through worksheets and delete row data

I have the following loop code that I need to run upon close of the workbook. However, it only runs on the active worksheet. I need to delete the data in rows 3-1,000 of each worksheet. There are three worksheets (listed in code) that I do not need cleared upon closing. Please help me see what I am missing. I have tried a few varieties of this same code, however I have not had a successful run. Thank you in advance.

Please Login or Register  to view this content.