2006/11/25

ワークシート名の変更

これも基本ですがいろいろ使えて便利.

【事例】
Sub Add_sheet()

Worksheets.Add Before:=Worksheets(1)
ActiveSheet.Name = Format(Date, "mm月dd日")

End Sub

【解説】
左から1つ目のシートの前に1枚付け加えて,名前を今日の日付で名前変更されるマクロとなります.ダイレクトに名前を入れても全然問題なし(ただし,その場合名前をダブルクォーテーションで囲む).

0 件のコメント: