このメソッドは、アクティブなブック内のワークシートを簡単に検索するためのVBAマクロを導入します。

1。 プレス 他の + F11 キーを同時に押して、Microsoft Visual Basic forApplicationsウィンドウを開きます。

2に設定します。 OK をクリックします。 インセット > モジュール、次に、次の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。 デフォルトでは、ナビゲーションペインが開いています。 閉じている場合は、をクリックしてください クツール > ナビゲーションペイン ナビゲーションペインを表示するには、をクリックします  （ワークブックとシート）ナビゲーションペインの左端にあります。

2。 確認してください フィルタ ナビゲーションペインのチェックボックス、および 指定したキーワードを次のボックスに入力します。 これで、名前に指定されたキーワードが含まれているすべてのワークシートが検索され、下のボックスに一覧表示されます。 スクリーンショットを参照してください：

Note：検索結果をクリックすると、ジャンプして対応するワークシートを一度に開きます。

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