Excelで最後にアクティブだったシートに戻る方法は？

多数のワークシートを持つワークブックでは、頻繁に使用する2つのワークシート間を行き来するのは難しい場合があります。実際には、VBAコードまたはOfficeアドインのみが、Excelで最後にアクティブだったワークシートにすばやく戻るのに役立ちます。以下の方法に従って、これを実現してください。

VBAコードを使用して最後にアクティブだったシートに戻る
Kutools for Excelを使用して最後にアクティブだったシートに戻る

VBAコードを使用して最後にアクティブだったシートに戻る

以下のVBAコードを実行して、Excelで最後にアクティブだったシートに戻ることができます。

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

2. Microsoft Visual Basic for Applicationsウィンドウで、左側のペインにあるThisWorkbookをダブルクリックし、以下のコードをThisWorkbook（コード）ウィンドウにコピーして貼り付けます。

VBAコード：最後にアクティブだったシートに戻る

Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    Set LstSht = Sh
End Sub

3. 次に、挿入 > モジュールをクリックしてモジュールウィンドウを開きます。その後、以下のコードをそのウィンドウに貼り付けます。

VBAコード：最後にアクティブだったシートに戻る

Public LstSht As Worksheet
Sub GoToLast()
    LstSht.Activate
End Sub

3. ワークブックに戻り、ワークシート間を切り替えます。その後、Microsoft Visual Basic for Applicationsウィンドウに戻り、F5キーを押してコードを実行します。すると、F5キーを押した後に最後にアクティブだったシートに戻ります。F5キーを繰り返し押すことで、2つのワークシート間を行き来できます。

Kutools for Excelを使用して最後にアクティブだったシートに戻る

Kutools for Excelの「最後と現在のシートを切り替える」機能を使用すると、Excelでワンクリックするだけで最後にアクティブだったシートにすばやく戻ることができます。以下のように操作してください。

Kutools for Excelをインストールすると、ナビゲーションペインが自動的にExcelの左側に表示されます。

1. あるワークシートから別のワークシートに切り替えた後、「ブックとシート」セクションにある「最後と現在のワークシートを切り替える」ボタンをクリックすると、最後にアクティブだったシートに戻ります。以下のデモをご覧ください：

注意：