目次
Excelのワークブックにたくさんのワークシートがあり、特定のシートやすべてのシート名をすばやく検索する方法を探しているなら、あなたは正しい場所にいます!この記事では、Excelワークブックでシート名で検索する2つの効果的な方法について、適切な図解を交えて説明します。
練習用ワークブックをダウンロードする
以下のExcelワークブックをダウンロードし、練習にご利用ください。
検索シート名.xlsm
Excelワークブック内のシート名を検索する2つの効果的な方法
ここでは、Excelワークブック内のワークシート名を検索する2つの方法について、適切な図解と解説を交えて説明します。
1.ナビゲーションボタン右クリックでシート名検索
Excelワークブックのナビゲーションボタンは、ステータスバーのすぐ上にあります。
多くのシート名を持つExcelワークブックで、このボタンを使って目的のシートを素早く見つけることができます。 以下の手順を実行するだけです。
ステップス
- する 右クリック について ナビゲーションボタン をクリックすると、Excelワークブックが表示されます。
エクセル・ワークブック内のすべてのシート名を含むダイアログボックスが表示されます。
- 現在 選ぶ をクリックし、最後にこのボタンをクリックします。 よっしゃー .
選択したシートに移動します。
続きを読む Excelのシート名を取得する方法(2つの方法)
2.VBAコードでExcelワークブック内のシート名を検索する
VBAのマクロを使えば、簡単にシート名を見つけることができます。 ここでは、その方法について説明します。
2.1 VBAによる検索とシート名リストからの移動
ここでは ブイビーエー このセクションでは、Excel ワークブックに含まれるすべてのシート名のリストを取得する方法について説明します。 ブイビーエー そのためには、以下のステップを踏んでください。
ステップス
- まず デベロッパー タブで表示します。
- 次に ビジュアルベーシック オプションを指定します。 デベロッパー タブと ブイビーエー のウィンドウがポップアップ表示されます。
または、 を押すと Alt+F11 キーが一緒になって ブイビーエー のウィンドウがポップアップ表示されます。
- 次に インサート のメニューバータブをクリックします。 ブイビーエー ウィンドウに表示されます。
- をクリックします。 モジュール .
これは、新しい モジュール ウィンドウに表示されます。
- では、以下をコピーしてください。 ブイビーエー のコードに貼り付けます。 モジュール ウィンドウに表示されます。
Sub List_SheetNames() Columns(1).Insert For i = 1 To Sheets.Count Cells(i, 1) = Sheets(i).Name Next i End Sub
- をクリックします。 実行 を押すか、メニューバーの F5 を実行します。 ブイビーエー のコードで表示されます。
これで、現在のシートにあるすべてのワークシート名のリストが作成されます。
- 必要なシートにジャンプするために、これらのシート名にハイパーリンクを割り当てることができます。 引き続き、それぞれのシートにハイパーリンクを追加する手順を説明します。
- 右クリック をオプトシート名で入力してください。
- に行ってみてください。 リンク オプションの> リンクの挿入 .
- 選択 本書記載箇所 .
- 特定のシートを選択します。
- プレス よっしゃー .
これで、作成されたリンクをクリックすると、対応するワークシートに移動することができます。
続きを読む: Excelでシート名を一覧表示する方法(5つの方法+VBA)
2.2 入力ボックスのシート名入力による検索
このVBAコードでは、検索ボックスで InputBox機能 検索ボックスにシート名を入力すると、Codeが目的のシートに移動します。 手順は以下のように簡単です。
ステップス
- まずは デベロッパー タブをクリックします。 ビジュアルベーシック ボタンをクリックします。
- その後 入れる タブを選択し モジュールです。 を新規に開きます。 モジュール ウィンドウに、以下を貼り付けてください。 ブイビーエー のコードになります。
Excelアプリケーションに「開発者」タブがない場合は、「開発者」タブを有効にするか、または Alt+F11 直接、新しいモジュールのウィンドウが開きます。
- 次に、以下のVBAコードをコピーして、モジュールに貼り付けます。
Sub Search_SheetName() Dim Name As String Dim Found As Boolean Name = InputBox("Enter sheet name:", "Sheet search") If Name = "" Then Exit Sub On Error Resume Next ActiveWorkbook.Sheets(Name).Select Found = (Err = 0) On Error GoTo 0 If Found Then MsgBox "Sheet '" & Name & "' found and selected!" Else MsgBox "The sheet '" & Name & "' not found!" End If End Sub
- をクリックします。 実行 のメニューバーのボタンをクリックします。 ビジュアルベーシック タブを押すか F5, をクリックすると、シート検索ボックスが表示されます。
- 検索したいシート名を記入して よっしゃー .
- シートが見つかったかどうか、別のダイアログボックスが表示されるので、それを閉じます。
注
このVBAコードでは、シート名を正確に一致させる必要があります。
続きを読む: ExcelのVBAでシート名を検索する方法(3例)
結論
このチュートリアルは、Excelワークブック内のシート名をVBAコードを使用して検索する方法と使用しない方法について説明しました。 このチュートリアルがお役に立てれば幸いです。 当社のウェブサイトをご覧ください。 エクセルウィキ ご意見、ご感想、お問い合わせは、以下のコメント欄にご記入ください。