サイトについて      連絡先   検索

VBA シートの名前を変更する

はじめに

Excel VBA のシートの名前を変更する方法を紹介します。

Sheets.Name プロパティか Worksheets.Name プロパティでシートの名前を変更できます。

シートの名前を変更する

インデックスと名前で変更

Sheets の引数にインデックスかシート名を指定すると、そのシートの名前を変更できます。

1 番目のシートの名前を変更するには Sheets(1).Name = "名前" または Worksheets(1).Name = "名前" のように指定します。

Sheets(1).Name = "名前"        ' 1 番目のシートの名前を変更
Sheets("Sheet1").Name = "名前" '「Sheet1」のシートの名前を変更

Worksheets(1).Name = "名前"        ' 1 番目のシートの名前を変更
Worksheets("Sheet1").Name = "名前" '「Sheet1」のシートの名前を変更
1

指定したシート名が存在しないときはエラーが発生します。

アクティブなシートの名前を変更

アクティブなシートの名前を変更するには ActiveSheet.Name = "名前" のように指定します。

ActiveSheet.Name = "名前"

シートの名前を取得する

Sheets の引数にインデックスかシート名を指定すると、そのシートの名前を変更できます。

1 番目のシートの名前を変更するには Sheets(1).Name または Worksheets(1).Name のように指定します。

Dim s As String
s = Sheets(1).Name        ' 1 番目のシートの名前を取得
s = Sheets("Sheet1").Name '「Sheet1」のシートの名前を取得

s = Worksheets(1).Name        ' 1 番目のシートの名前を取得
s = Worksheets("Sheet1").Name '「Sheet1」のシートの名前を取得
Debug.Print(s)

関連ページ