Excelで選択した範囲を除くすべてを削除するにはどうすればよいですか？

Excelでは、選択した範囲をすばやく直接削除できますが、選択した範囲以外の他のセルの内容を削除しようとしたことがありますか？ この記事では、Excelでこのタスクをすばやく簡単に解決するための秘訣をいくつか紹介します。

選択した範囲を除くすべてをVBAコードで削除する

Kutools forExcelのSelectRange Helperを使用して、選択した範囲を除くすべてを削除します

選択した範囲を除くすべてをKutoolsforExcelのコピー範囲で削除します

選択した範囲を除くすべてをVBAコードで削除する

選択されていないすべてのセル値を一度に削除する直接的な方法はありませんが、次のVBAコードが役立つ場合があります。次のようにしてください。

1。 持ってください Ctrlキー キーを押して、保持するセルを選択します。

2。 押す Altキー+ F11 キーを同時に開いて アプリケーション用 Microsoft Visual Basic 窓。

3。 の中に アプリケーション用 Microsoft Visual Basic ウィンドウダイアログボックスをクリックします インセット > モジュール、次に以下のVBAコードをコピーして貼り付けます モジュール 窓。

VBAコード：選択した範囲を除くすべてのセル値を削除します

Sub ClearAllExceptSelection()
'updateby Extendoffice
    Dim xRg As Range
    Dim xCell As Range
    Dim xAddress As String
    Dim xUpdate As Boolean
    On Error Resume Next
    xAddress = Application.ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the ranges want to keep", "Kutools for Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xUpdate = Application.ScreenUpdating
    Application.ScreenUpdating = False
    For Each xCell In ActiveSheet.UsedRange
        If Intersect(xCell, xRg) Is Nothing Then
            xCell.Clear
        End If
    Next
    Application.ScreenUpdating = xUpdate
End Sub

4。 次に、 F5 このコードを実行するためのキーを押すと、保持するセルの範囲を選択するように促すプロンプトボックスが表示されます。手順1で範囲を選択した場合は、をクリックしてください。 OKそうでない場合は、プロンプトボックスで必要なセルを選択し、コンマを入力して複数の範囲を区切ってから、をクリックします。 OK ボタン、スクリーンショットを参照してください：

5。 クリック後 OK、他のすべてのセル値は削除されましたが、選択した範囲はそのままです。スクリーンショットを参照してください。

Kutools forExcelのSelectRange Helperを使用して、選択した範囲を除くすべてを削除します

あなたがインストールしている場合 Kutools for Excelそのと 逆選択 の特徴 RangeHelperを選択します ユーティリティを使用すると、選択をすばやく元に戻し、元に戻した選択を一度に削除できます。

インストールした後 Kutools for Excel、次のようにしてください:( 今すぐExcel用のKutoolsを無料でダウンロードしてください！ )

1。 保持するセルの範囲を選択します。

2。 次に、をクリックします クツール > 選択 > RangeHelperを選択します、スクリーンショットを参照してください：

3。 の中に RangeHelperを選択します ダイアログボックス、チェック 逆選択、スクリーンショットを参照してください：

4。 次に、マウスをドラッグして、選択を元に戻す範囲を選択します。 マウスを離すと、選択されたセルが選択解除され、選択されていないセルが一度に選択されます。 スクリーンショットを参照してください：

5。 次に、ダイアログボックスを閉じて、を押します。 削除 選択を一度に削除するためのキー。 そして、必要なセルのみが保持されています。スクリーンショットを参照してください。

今すぐExcel用のKutoolsを無料でダウンロードしてください！

Kutools forExcelのSelectRange Helperを使用して、選択した範囲を除くすべてを削除します

別のユーティリティ-コピー範囲 of Kutools for Excel また、このジョブを完了するのに役立ちます。選択した範囲を新しいワークシートにコピーしてから、古いワークシートを削除するだけです。

インストールした後 Kutools for Excel、次の手順で実行してください:( 今すぐExcel用のKutoolsを無料でダウンロードしてください！ )

1。 ホールド Ctrlキー キーを押して、保持するセルの範囲を選択します。

2。 次に、をクリックします クツール > コピー範囲、スクリーンショットを参照してください：

3。 とで 複数の範囲をコピーする ダイアログボックス、チェック すべて オプションの下に 特別なペーストチェック 行の高さを含む • 列幅を含む 必要な行の高さと列の幅を維持したい場合は、スクリーンショットを参照してください。

4。 次に、をクリックします Ok ボタンをクリックすると、別のプロンプトボックスが表示され、コピーしたセルを配置するセルを選択するように通知されます。新しいワークシートでセルを選択してください。スクリーンショットを参照してください。

5。 そして、 OK、および選択した範囲のみが新しいワークシートに貼り付けられ、必要に応じて元のワークシートを削除できるようになりました。

今すぐExcel用のKutoolsを無料でダウンロードしてください！

デモ：Kutools for Excelを使用して、選択した範囲を除くすべてを削除します