Data Sorting Macro and Worksheet

I included the exact worksheet I am working on with dummy data in place of the real data. The intent is to take the unorganized information on Sheet1 and then populate the tabs according to the table set-up I included. I began work on the macro and can't get Case 2 to work (of course it will basically be a copy paste for all the other cases). If anyone can give me some pointers on this it would be appreciated!

The If statement with the reverse counter and Tempmem is so that when one day has both lunch and dinner they are compiled into one row, rather than two.

Thanks

Edit: The final step after this information is a series of line graphs of each day of the week. I.E. A Monday graph showing all of the monday covers/averages throughout the time of the data set. This may help explain where I am headed.