Excelでアクティブなシートタブをハイライトするにはどうすればよいですか？

開いているワークブックでは、アクティブなシートタブはデフォルトでタブを白くし、テキストを太字にすることで他のタブと区別されます。アクティブなワークシートタブをワークブック内でさらに目立たせたい場合、この記事の方法が役立ちます。

VBAコードを使用してアクティブなワークシートタブをハイライトする

VBAコードを使用してアクティブなワークシートタブをハイライトする

開いているExcelワークブックでアクティブなシートタブをハイライトするには、次の手順を実行してください。

1. アクティブなシートタブをハイライトしたいワークブックで、Alt + F11キーを押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。

2. Microsoft Visual Basic for Applicationsウィンドウで、左ペインのThisWorkbookをダブルクリックし、VBAコードをThisWorkbook（コード）ウィンドウにコピーして貼り付けます。スクリーンショットをご覧ください：

VBAコード：開いているワークブックでアクティブなワークシートタブをハイライトする

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    Dim xSheet As Worksheet
    Application.ScreenUpdating = False
    For Each xSheet In ThisWorkbook.Worksheets
        If xSheet.Name = ActiveSheet.Name Then
            xSheet.Tab.ColorIndex = 6
        Else
            xSheet.Tab.ColorIndex = 2
        End If
    Next
    Application.ScreenUpdating = True
End Sub

3. Alt + Qキーを押して、Microsoft Visual Basic for Applicationsウィンドウを閉じます。

これで、シートをアクティブにすると、下のスクリーンショットに示すように、シートタブが自動的に黄色でハイライトされます。

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！

関連記事：

• Excelでセルにタブ名を参照するにはどうすればよいですか？
• Excelでシートタブ名をセルの値と等しくするにはどうすればよいですか？
• Excelでセルの値をシートタブ名と一致させる、またはその逆を行うにはどうすればよいですか？