VBA　複数のシート名に名前を付ける

目的:月の日数分のシート(今回は30枚分)に
年月日の名前を付けて月初の日次業務を効率化するため。

今回は年月日で名前を付けたが文字を省略して見やすくしようと思う。
今回は１つのブックに複数のシートを作成した。
今後は複数のシートが記載された２つ以上のブックをフォルダ単位で管理できるようなマクロを作成したいと思う。