ワークブック内のシートのハイパーリンク付き索引を作成するにはどうすればよいですか？

日常業務では、1つのワークブックファイルに複数のワークシートが存在することがあります。このような場合、どのようにしてワークシートタブの索引をワークシート内に作成し、各タブにハイパーリンクを設定すればよいでしょうか？この記事では、Excelでこのタスクを処理するためのいくつかの簡単な方法について説明します。

VBAコードを使用してシートのハイパーリンク付き索引を作成する

Kutools for Excelの「リンクテーブルの作成」機能を使用してシートのハイパーリンク付き索引を作成する

Kutools for Excelの「ナビゲーション」機能を使用してシートのハイパーリンク付き索引を作成する

VBAコードを使用してシートのハイパーリンク付き索引を作成する

以下のVBAコードは、他のすべてのワークシートの前に新しいワークシートにシート名の索引を作成するのに役立ちます。以下のように操作してください：

1. ALT + F11キーを押したままにすると、Microsoft Visual Basic for Applicationsウィンドウが開きます。

2. 「挿入」>「モジュール」をクリックし、次のコードをモジュールウィンドウに貼り付けます。

VBAコード: シートのハイパーリンク付き索引を作成する

Sub CreateIndex()
'updateby Extendoffice
    Dim xAlerts As Boolean
    Dim I  As Long
    Dim xShtIndex As Worksheet
    Dim xSht As Variant
    xAlerts = Application.DisplayAlerts
    Application.DisplayAlerts = False
    On Error Resume Next
    Sheets("Index").Delete
    On Error GoTo 0
    Set xShtIndex = Sheets.Add(Sheets(1))
    xShtIndex.Name = "Index"
    I = 1
    Cells(1, 1).Value = "INDEX"
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> "Index" Then
            I = I + 1
            xShtIndex.Hyperlinks.Add Cells(I, 1), "", "'" & xSht.Name & "'!A1", , xSht.Name
        End If
    Next
    Application.DisplayAlerts = xAlerts
End Sub

3. そして、F5キーを押してこのコードを実行すると、「Index」という名前の新しいワークシートがすべてのシートの前に挿入され、シート名とハイパーリンクが含まれます。スクリーンショットをご覧ください：

Kutools for Excelの「リンクテーブルの作成」機能を使用してシートのハイパーリンク付き索引を作成する

上記のVBAコードの他にも、便利なツールであるKutools for Excelの「リンクテーブルの作成」機能を使用して、この作業を完了することもできます。これにより、ハイパーリンクまたはボタン付きのシート名の索引を迅速に作成できます。

Kutools for Excelをインストール後、次の手順を実行してください：

1. Kutools Plus > ワークシート > リンクテーブルの作成 をクリックします。スクリーンショットをご覧ください：

2. 「リンクテーブルの作成」ダイアログボックスで、次のオプションを設定してください：

• 索引スタイルを選択し、 ハイパーリンクまたはボタンを使用してシート名の索引を作成します；
• シート索引をリストするシートの名前を指定します；
• シート索引を配置する場所を指定します；
• シート名の一覧を表示する列数を選択します。

3. 設定が完了したら、「OK」ボタンをクリックすると、次のようにシート名索引付きの新しいワークシートが作成されます：

ハイパーリンク付きのシート名	ボタンを使用したシート名

この「リンクテーブルの作成」機能の詳細については、こちらをクリックしてください…

Kutools for Excelの「ナビゲーション」機能を使用してシートのハイパーリンク付き索引を作成する

Kutools for Excelの「ナビゲーション」ユーティリティを使用すると、左ペインにすべてのシート名をリストアップでき、任意のシート名をクリックしてそのワークシートに移動することができます。

Kutools for Excelをインストール後、次の手順を実行してください：

1. Kutools > ナビゲーション をクリックします。スクリーンショットをご覧ください：

2. 次に、「ワークブック & シート」アイコンをクリックしてナビゲーションペインを展開します：

	1. ここで、開いているすべてのワークブックがリストされています。
	2現在のワークブック内の表示されているワークシートが以下にリストされています。 リストボックスから目的のシートをクリックすることで、特定のシートに移動できます。

このナビゲーションペインの詳細については、こちらをクリックしてください…