Looping through all sheets not working

I havea macro to loop through all the sheets in a workbook and apply a fliter in column C. the filter is by Date and all sheets have the exact same format. For some reason the macro will go through the loop but not change to the next sheet. The message box line however does go from sheet to sheet.

Please Login or Register  to view this content.

I attached a 2 tab work book example. When i run the program, it only applies it to Sheet 1.

Any help would be great.

Hi, try adding Sheets(I).select as the first line of your for loop.

Worked Like a charm, thank you. One question, what can i add to the end of the loop so it will not get an error after the last sheet?