【Excel VBA】シートをコードネームで操作する最も確実な方法

2025年8月13日

VBAで特定のシートを操作する際、Worksheets("シート名")やWorksheets(1)といった指定方法が一般的です。しかし、これらの方法はユーザーがシート名を変更したり、シートの順番を入れ替えたりすると、途端にマクロがエラーで止まってしまうという弱点があります。

実は、VBAにはユーザーの操作に一切影響されない、最も安全で確実なシートの指定方法が存在します。それが**「コードネーム」**でシートを操作する方法です。

この記事では、コードネームとは何か、そしてそれを使って堅牢なマクロを組む方法を解説します。

コードネームとは？

コードネームは、VBAの内部で使われる、各シートに与えられた「本当の名前」です。ユーザーがシートタブ上で変更する名前（タブ名）とは別に存在し、VBE（VBAの編集画面）からしか確認・変更できません。

コードネームの確認方法

ExcelでAlt+F11キーを押し、VBEを開きます。
画面左側の「プロジェクトエクスプローラー」に、ブック内のシート一覧が表示されます。
ここに表示されている括弧の外の名前が「コードネーム」、括弧の中の名前がユーザーに見えている「タブ名」です。

この例では、タブ名が「月次データ」となっていても、このシートのコードネームはSheet1です。

なぜコードネームが最強なのか？

コードネームは、ユーザーがシート名やシートの順番を自由に変更しても、一切変わりません。そのため、常に特定のシートを正確に参照できます。

指定方法	ユーザーがシート名を変更	ユーザーがシート順を変更	堅牢性
タブ名 `Worksheets("データ")`	動作しない	動作する	低い
インデックス `Worksheets(1)`	動作する	動作しない	低い
コードネーム `Sheet1`	動作する	動作する	非常に高い

Google スプレッドシートにエクスポート

完成したVBAコード

以下のコードは、コードネームshReportを持つシートに対して、シート名を今月の名前に変更し、見出しを書き込むものです。ユーザーが事前にシートのタブ名をどんな名前に変えていても、このコードは正しく動作します。

' このコードを実行する前に、VBEで対象シートのコードネームが「shReport」であることを確認・設定しておきます
Sub ManipulateSheetByCodeName()
    
    ' --- 1. コードネームを使ってシート名を動的に変更 ---
    ' 「shReport」というコードネームは、ユーザーがタブ名を変更しても不変です
    shReport.Name = Format(Date, "yyyy年m月") & "度レポート"
    
    ' --- 2. コードネームを使ってセルを操作 ---
    shReport.Range("A1").Value = "レポート作成日:"
    shReport.Range("B1").Value = Date
    
    ' --- 3. コードネームを使ってタブの色を変更 ---
    shReport.Tab.Color = vbRed
    
    MsgBox "コードネーム「shReport」で指定されたシートを編集しました。"
    
End Sub

Worksheets("...")という記述が一切なく、shReportというオブジェクト名で直接シートを操作している点に注目してください。