Excel VBA：ワークシートの目次を作成する｜HyPerlinksプロパティの使い方

HyPerlinksプロパティでハイパーリンクが付いた目次を作成するVBAを掲載しています。

実行Excelシート画面

「シート目次作成」ボタンで、C7セルから目次を作成します。

下線が付いていることから、ハイパーリンクが設定されているのが分ります。

クリックすると対応するシートにジャンプできます。

Excel VBA実行コード

'ハイパーリンクでシートのもくじを作成
Sub ボタン1_Click()
    Dim i As Integer

    'リンク先をC10に設定
    For i = 1 To Worksheets.Count
        Worksheets("Sheet1").Hyperlinks.Add anchor:=Cells(i + 6, 2), _
            Address:="", _
            SubAddress:=Worksheets(i).Name & "!C10", _
            TextToDisplay:=Worksheets(i).Name
    Next
End Sub

■■■
このサイトの内容を利用して発生した、いかなる問題にも一切責任は負いませんのでご了承下さい
■■■
当ホームページに掲載されているあらゆる内容の無許可転載・転用を禁止します