Collect data from multiple sheets into a Summary Sheet

I am looking for a macro that will look through 31 sheets and check to see if any information has been placed into cells B7:H25 on those sheets. if there is any information in these cells I need it copied and placed on a summary sheet with the sheet name (represents the date) as well as column A which holds the time. It only needs to pull information if there is data present but data may not necessarily go row to row and may skip. I have a partial macro already added that I found while looking through the forums and have left it in. The summary page I would need to have a button to run the macro as well. If anyone can help me I would be much appreciative.