I am trying to rename a work book with multiple sheets. I want to rename the first 31(or 28 as the case may be) to the Day of the month, ie. January 1, January 2, etc. then my last page is a master that combines data on all the other sheets Right now i'm using a macro: Sub EditthistochangetheMonth() nmbr = InputBox("Type in the first day you want to start the sheets at (ie. 1 for April 1st)", "Renaming Sheets") For ws = 1 To Worksheets.Count 'Change Month to current Month ie. In line below this one, retype Month to be May Sheets(ws).Name = "Month " & nmbr nmbr = nmbr + 1 Next ws End Sub Which renames them all, including my Master.
Solved by S. J. in 14 mins