Home » エクセルマクロ・Excel VBAの使い方 » Sheets・Worksheet » シート名を連番にするマクロ

シート名を連番にするマクロ

対象:Excel2003, Excel2007, Excel2010

シート名を連番にするマクロ

「エクセル シート名を一括して連番にする」
という検索でこのサイト・インストラクターのネタ帳へのアクセスがありました。

Excelで複数のワークシートがあるときに、シートの名前を一括して連番にする方法を探している方による検索です。

[スポンサードリンク]

こういう作業には、VBA(Visual Basic for Applicatios)でマクロを作るのが一番です。

▼シート名を連番にするマクロ

Sub すべてのシートを連番にする()

 Dim i As Long
 
 For i = 1 To Sheets.Count
  Sheets(i).Name = "シート" & i
 Next i

End Sub

上記のマクロを実行すると、ワークシートもグラフシートも含めて、すべてのシートの名称が「シート1」「シート2」のようになります。

単純に数字だけのシート名にしたいのであれば、
  Sheets(i).Name = "シート" & i
の部分を
  Sheets(i).Name = i
としてください。

[スポンサードリンク]

Home » エクセルマクロ・Excel VBAの使い方 » Sheets・Worksheet » シート名を連番にするマクロ

「Sheets・Worksheet」の記事一覧

検索


Copyright © インストラクターのネタ帳 All Rights Reserved.

.