for each sh in Thisworkbook.Worksheets
sh.name = sh.Name & "aa"
Next

--
regards,
Tom Ogilvy


"Dawn Rhoads" wrote in message
...
I have a monthly worksheet that requires one worksheet tab for each day.
Every month, I take my master sheet and manually rename each tab for the
next
month.

Is there any way this could be done with a macro? If so, can someone
provide sample code? I have some experience with recording macros for
Word,
but I'm definitely no programmer, so I can't actually write one myself!
Thanks for any help anyone can provide!