Clearing with Macros

[volkl77]

I have a spreadsheet with tabs for each day of the month. I would like to set up a macro that will clear all the data I have entered to get the spreadsheet ready for the next month. Is there a way to create a macro that will clear all the data in the spreadsheet or would it be easiest to create a reference sheet and have the macro copy that sheet to all the tabs? Thanks again!

 

[Mike Blackman]

Something like this?

Sub ResetWorksheet()

    Dim ws As Worksheet
    
    For Each ws In ThisWorkbook.Worksheets
        .Rows("2:" & Rows.Count).ClearContents
    Next ws

End Sub

This will clear every worksheet in the workbook from row 2 down.