アクティブまたは選択したシートをExcelでのみすばやく表示するにはどうすればよいですか？

作業中のブックに複数のシートがあり、アクティブなシートまたは選択したシートのみを表示して他のシートを非表示にしたい場合、手動でXNUMXつずつ非表示にせずにすばやく処理するにはどうすればよいですか？

VBAでのみアクティブシートを表示する

選択したシートをKutoolsforExcelでのみ表示する

VBAでのみアクティブシートを表示する

これは、アクティブなシートを除くすべてのシートをすばやく非表示にできるVBAコードです。

1。 押す Altキー+ F11 表示するキー アプリケーション向け Microsoft Visual Basic 窓。

2。 次に、をクリックします インセット > モジュール VBAの下に新しいものを貼り付けます モジュール 窓。

VBA：アクティブなシートのみを表示

Sub Macro1()
'UpdatebyKutoolsforExcel20160409
    Dim xSht As Object
    For Each xSht In ThisWorkbook.Sheets
        If xSht.Name <> ThisWorkbook.ActiveSheet.Name Then xSht.Visible = False
    Next
End Sub

3。 クリック ラン ボタンまたはプレス F5 VBAを実行するためのキーそして今、アクティブなシートだけが表示され、他は非表示になっています。

選択したシートをKutoolsforExcelでのみ表示する

あなたが持っている場合 Kutools for Excel インストールすると、ワンクリックで非アクティブなシートや選択されていないシートをすばやく非表示にできます。

後 無料インストール Kutools for Excel、以下のようにしてください：

シートをアクティブにするか、表示するシートを選択して、[ クツール > 表示と非表示 > 選択されていないシートを非表示。 スクリーンショットを参照してください：

これで、選択されていないシートが非表示になります。

ヒント： すべてのシートを表示したい場合は、 クツール > 表示と非表示 > すべてのシートを再表示。 スクリーンショットを参照してください：