ExcelでXNUMX枚のシートを切り替える/切り替える方法は？

多数のワークシートを含むブックがあるとしますが、多くの場合、Sheet1とSheet 30などのXNUMXつの特定の隣接していないシート間を移動する必要があります。ExcelでこのXNUMXつの隣接していないシートをすばやく簡単に切り替えるにはどうすればよいですか？

VBAコードを使用して隣接していないXNUMXつのシートを切り替えます

隣接していないXNUMX枚のシートをKutoolsforExcelで切り替えます

VBAコードを使用して隣接していないXNUMXつのシートを切り替えます

次のVBAコードは、XNUMXつの特定のワークシート間をジャンプするのに役立ちます。次のようにしてください。

1。 を押し続けます Alt + F11 キー、そしてそれは開きます アプリケーション向け Microsoft Visual Basic 窓。

2。 そして、ダブルクリックします このワークブック セクションに プロジェクトエクスプローラー モジュールを開くには、スクリーンショットを参照してください。

Note： プロジェクトエクスプローラー を開いても表示されません アプリケーション向け Microsoft Visual Basic ウィンドウをクリックすると 表示 タブを選択 プロジェクトエクスプローラー それを開くには、スクリーンショットを参照してください：

3. 次に、次のコードをに貼り付けます モジュールウィンドウ.

VBA：隣接していないXNUMX枚のシートを切り替えます

Public LateWsName As String
'Update 20130830
Sub ToggleSheets()
If LateWsName <> "" Then
    Application.Sheets(LateWsName).Activate
End If
End Sub
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
LateWsName = Sh.Name
End Sub

4。 そして、1つずつ切り替えたい30つのワークシート（SheetXNUMXとSheetXNUMX）をクリックします。

5。 次に、 F5 このコードを実行するには、キーを押します。1回押すと、シート30が表示され、もう一度押すと、シートXNUMXが切り替わります。 したがって、を押すことで、このXNUMX枚のシートを前後に切り替えることができます。 F5 キー。

隣接していないXNUMX枚のシートをKutoolsforExcelで切り替えます

上記のコードはあなたにとってやや難しいかもしれませんが、ここではワンクリックでこのタスクを完了する簡単な方法を紹介します。

Kutools for Excel 300以上の便利なExcelツールが含まれています。 30日以内に制限なしで無料でお試しいただけます。 今すぐ入手.

Kutools for Excelをインストールしたら、次の手順に従ってください。

1。 使用するブックを開きます。 そして、 クツール > ナビゲーション.

2。 そしてその ナビゲーションペイン が表示されたら、をクリックします シート タブには何も表示されないことに注意してください。

3。 次に、切り替えたいXNUMXつのシートをクリックし、次にクリックすると ボタンの ナビゲーションペイン、 最後にクリックしたXNUMX枚のシートが前後に切り替わります。

Note：XNUMXつのブックのXNUMXつのシートを切り替えることもできます。

このナビゲーションペインの詳細については、クリックしてください.

関連記事：

• すべてのワークシートをXNUMXつのワークブックにリストする
• ワークブックのウィンドウ間を移動する
• ナビゲーションペインを表示
• セル間を移動する
• 名前付き範囲のリスト
• 列ヘッダー名を一覧表示します