ワークシートの目次を作成 : Excel(エクセル)

(Excel2007でソフト作成)

Excel Tipsメニューに戻る

スポンサーリンク





HyPerlinksプロパティで、シート名の目次を作成します。
シート名は、Worksheets().Name で取得します。
ハイパーリンクですので、クリックするとそのシートに移動します。
移動先シートのセル位置は、SubAddress で指定します。
今回はC10に設定しました。

Excelシート画面

■実行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

Excel Tipsメニューに戻る

スポンサーリンク






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


Copyright (c) Excel-Excel ! All rights reserved