[[20240718143514]]　『先頭にシート目次（リンク）を作りたい』（みみん）　ページの最後に飛ぶ

『先頭にシート目次（リンク）を作りたい』（みみん）

はじめまして
ご教示お願いします
エクセルのひとつのファイルに50以上のシートがあり、
確認したいシートに辿り着くまで時間がかかります。

目次シートを作り、そのシートから各シートへリンクを貼って
容易に飛ぶ設定がしたいのですが可能でしょうか？
また、随時追加されるシートを自動で目次シートに追加もできるのでしょうか？
自動追加は無理かもしれませんが、目次シート作成とリンク設定について教えてください
よろしくお願い申し上げます。

＜使用 Excel：Microsoft365、使用 OS：Windows11 ＞

 シートタブの左側の◀　▶部分にカーソルを持って行って右クリックするとシート名一覧が表示されシート名を選択すると
 そのシートに飛べるがそれではどうだろうか？

 なお◀　▶部分にしばらくカーソルを置いておくと説明が表示される。
（ねむねむ） 2024/07/18(木) 14:46:24

本格的なマクロを組まなくても、つぎの方法でシート名の
一覧が取得できますので、それを目次シートにコピー（仮にH列）して
リスト入力のデータとします。
このリストで選択したシートにジャンプします。

手順１．タブ「開発」→「Visual Basic」と選択してVBEに移動します。

手順２．「表示」→「イミディエイトウィンドウ」と選択してイミディエイトウィンドウを
　　　　表示して、つぎのコードを入力してEnterキーを押します。
　　　　下記のコードをコピーしてください。

　　　　For Each i In ThisWorkbook. Sheets: debug.print i.name : next i

　　　　シート名の一覧が表示されます。

手順３．このシート名の一覧を目次シートの仮にセルH1にコピーします。

手順４．仮にセルB2にH列を参照する「リスト入力」を設定します。
　　　　シートの挿入に対応するために、リストの範囲は多めにします。

手順５．=HYPERLINK("#"&B2&"!A1",B2&"へ移動")

HYPERLINK を設定したセルをクリックするとリスト入力で選択したシートのセルA1にジャンプします。
ジャンプ先のセルは都合のいいセルに変更してください。

（メジロ） 2024/07/18(木) 16:32:25

コメント返信：