Excelで特定のシートに移動するにはどうすればよいですか？

タブ名をクリックして特定のシートに移動するのは多くのユーザーにとって簡単ですが、ワークブックが大きくて複数のシートがあり、すべてのシートがタブに表示されない場合（以下のスクリーンショット参照）、どのように素早く目的のシートを見つけて移動できますか？

右クリックで特定のシートに移動

VBAで特定のシートに移動

Kutools for Excelで特定のシートに移動

Kutools for Excelでシート名が存在するか確認

右クリックで特定のシートに移動

Excelでは、特定のシートに移動するために右クリックを使用することができます。

カーソルをシート左下隅にある小さな矢印に合わせて右クリックすると、最初の15個のシートが表示されるコンテキストメニューがポップアップします。

もしワークブック内に15枚以上のシートがある場合、「More Sheets」をクリックして「 Activate」ダイアログを開くことができます。このダイアログにはすべてのシートが表示され、スクロールして目的のシートを見つけ、クリックしてアクティブにするだけです。

注意: Excel 2013では、シートバーの右下隅にある矢印を右クリックすると、「Activate」ダイアログボックスが直接ポップアップします。

ワークブックに非常に多くのシートがある場合、スクロールして特定のシートを見つけるのは適切な方法ではありません。

VBAで特定のシートに移動

特定のシートを迅速に見つけ、移動するのに役立つVBAコードがあります。

1. Alt + F11キーを同時に押すと、Microsoft Visual Basic for Applicationsウィンドウがポップアップします。

2. 「Insert」→「Module」をクリックし、以下のVBAコードを Moduleウィンドウに貼り付けます。

VBA：特定のシートに移動

Sub GotoSheet()
'UpdatebyKutoolsforExcel20150916
    Dim xRet As Variant
    Dim xSht As Worksheet
    xRet = Application.InputBox("Go to this sheet", "Kutools for Excel")
    On Error Resume Next
    If xRet = False Then Exit Sub
    On Error GoTo 0
    On Error Resume Next
    Set xSht = Sheets(xRet)
    If xSht Is Nothing Then Set xSht = Sheets(Val(xRet))
    If xSht Is Nothing Then
        MsgBox "This sheet does not exist", , "Kutools for Excel"
    Else
        xSht.Activate
    End If
End Sub

3. 「Run」をクリックするか F5キーを押してコードを実行すると、Kutools for Excelダイアログがポップアップするので、探したいシート名をテキストボックスに入力してください。スクリーンショットをご覧ください：

4. 「OK」をクリックすると、指定したシートに移動しています。

Kutools for Excelで特定のシートに移動

Kutools for Excelを使用すると、すべてのシート名をリスト化してから、必要なシート名を探して移動することができます。

無料でインストール 後、以下のように操作してください：

1. 「Kutools Plus」→「Worksheet」→「Create List of Sheet Names」をクリックします。スクリーンショットをご覧ください：

2. 表示されたダイアログで、以下のように操作します：

1) チェック ハイパーリンクのリストが含まれる オプション；
2) 新しいシートの名前を入力し、そのシートにはすべてのシート名が含まれます；
3) 新しいシートを挿入する場所を指定します；
4) シート内のシート名を配置する列数を指定します。

3. 「Ok」をクリックします。これで、すべてのシート名がリストされた新しいシートが作成されます。

4. Ctrl + Fを押して「 Find and Replace」ダイアログを開き、探したいシート名を「Find what」テキストボックスに入力します。スクリーンショットをご覧ください：

5. 「Find All」をクリックします。これで必要なシートが選択されています。（「 Find and Replace」ダイアログを閉じて）そのシートをクリックすると、指定したシートに移動します。

「Create List of Sheet Names」についてさらに詳しくはこちらをクリックしてください。

クリック可能なシート名の一覧を作成

Kutools for Excelでシート名が存在するか確認

もしシート名がワークブック内に存在するかどうかを確認したいだけで、移動する必要がない場合、ここで便利な方法をご紹介します。

無料でインストール 後、以下のように操作してください：

1. 「 Kutools Plus」→「Worksheet」→「Rename Worksheets」をクリックします。スクリーンショットをご覧ください：

2. 表示されたダイアログで「Filter」チェックボックスをオンにします。スクリーンショットをご覧ください：

3. 「Filter」の下にあるテキストボックスに確認したいシート名を入力します。入力を終えると、関連するシートが「Worksheet」リストに表示される場合は、そのシートはワークブック内に存在します。そうでなければ存在しません。

Kutools for Excelの「Rename Multiple Worksheets」についてさらに詳しくはこちらをクリックしてください。