Excelでワークシート名で検索するにはどうすればよいですか？

この方法では、現在のワークブック内のワークシートを簡単に検索するためのVBAマクロを紹介します。

1. Alt + F11 キーを同時に押して、Microsoft Visual Basic for Applications ウィンドウを開きます。

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

VBA: ワークシート名で検索

Sub SearchSheetName()
Dim xName As String
Dim xFound As Boolean
xName = InputBox("Enter sheet name to find in workbook:", "Sheet search")
If xName = "" Then Exit Sub
On Error Resume Next
ActiveWorkbook.Sheets(xName).Select
xFound = (Err = 0)
On Error GoTo 0
If xFound Then
MsgBox "Sheet '" & xName & "' has been found and selected!"
Else
MsgBox "The sheet '" & xName & "' could not be found in this workbook!"
End If
End Sub

3. F5キーを押すか、実行ボタンをクリックして、このVBAを実行します。

4[シート検索]ダイアログボックスが表示されますので、検索したいワークシート名を入力し、 OK ボタンをクリックしてください。スクリーンショットをご覧ください：

別のダイアログボックスが表示され、ワークシートが見つかったかどうかが通知されます。それを閉じてください。

注: このVBAは正確に一致するワークシート名を必要とします。完全なワークシート名を正確に入力した場合のみ、このVBAでワークシートを見つけることができます。

Kutools for Excel がインストールされている場合、ナビゲーションペイン上でシート名でワークシートを簡単に検索できます。以下の手順を行ってください：

1デフォルトでは、ナビゲーションペインは開いています。閉じている場合は、 Kutools > ナビゲーション をクリックしてナビゲーションペインを表示し、次に （ワークブック & シート）をナビゲーションペインの一番左側でクリックします。

2続けて、ナビゲーションペインの フィルター チェックボックスをオンにし、 指定されたキーワードを下記のボックスに入力します。これで、指定されたキーワードを含むすべてのワークシートが検索され、下のボックスにリストアップされます。スクリーンショットをご覧ください：

注: 検索結果をクリックすると、対応するワークシートがすぐに開き、移動します。

同じワークブック内の別のシートへのハイパーリンクをセル内に作成する