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 はワークシート名の完全一致を必要とします。正確に完全なワークシート名を入力した場合にのみ、該当のワークシートを検索できます。

Kutools for Excel がインストール済みであれば、ナビゲーションからシート名でワークシートを簡単に検索できます。以下の手順に従ってください：

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

2。ナビゲーション内の「フィルター」チェックボックスをオンにし、以下のボックスに特定のキーワードを入力します。すると、指定されたキーワードを含むすべてのワークシートが検索され、下のボックスに一覧表示されます。スクリーンショットをご参照ください：

注：検索結果をクリックすると、対応するワークシートがすぐに開き、その位置にジャンプします。

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