Excelでシートタブ名をセルの値と一致させるにはどうすればよいですか？

場合によっては、特定のセルの値に合わせてワークシートの名前を変更する必要があるかもしれません。この記事では、Excelでシートタブ名をセルの値と一致させる方法をご紹介します。

VBAコードを使用してシートタブ名をセルの値と一致させる
Kutools for Excelを使用してシートタブ名をセルの値と一致させる

VBAコードを使用してシートタブ名をセルの値と一致させる

次のVBAコードを使用すると、シートタブ名をセルの値と自動的に一致させることができます。

1. シート名をセルの値に一致させたいシートタブを右クリックし、「コードの表示」を右クリックメニューから選択します。スクリーンショットをご覧ください：

2. 下記のコードをコピーしてコードウィンドウに貼り付け、その後「Alt」＋「Q」キーを同時に押してMicrosoft Visual Basic for Applicationsウィンドウを閉じます。

VBAコード：シートタブをセルの値に一致させる

Private Sub Worksheet_Change(ByVal Target As Range)
'Updated by Extendoffice 20230130
    On Error Resume Next
    If Not Intersect(Target, Range("A1")) Is Nothing Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    ElseIf Not Intersect(Target.Dependents, Range("A1")) Then
        ActiveSheet.Name = ActiveSheet.Range("A1")
    End If
End Sub

注：コード内のA1は、シート名として使用したい値が入っているセルです。必要に応じて変更できます。

今後、セルA1の値が変更されると、シートタブ名もそれに合わせて自動的に更新されます。

Kutools for Excelを使用してシートタブ名をセルの値と一致させる

このセクションでは、「Kutools for Excel」の「バッチ名前変更ワークシート」機能を紹介します。この機能を使用すると、Excelで特定のセルの値に基づいてワークシートの名前を簡単に変更できます。

1. 「Kutools Plus」＞「ワークシート」＞「バッチ名前変更ワークシート」をクリックします。スクリーンショットをご覧ください：

2. 「バッチ名前変更ワークシート」ダイアログボックスで、以下の操作を行う必要があります。

下記のスクリーンショットのように、選択したワークシートが指定された範囲の値で即座に名前変更されることが確認できます。

注意：

Kutools for Excelを使用してシートタブ名をセルの値と一致させる