ヒント:他の言語はGoogle翻訳されています。 訪問することができます English このリンクのバージョン。
ログイン
x
or
x
x
お申し込み
x

or

どのようにExcelで選択範囲を削除するには?

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

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

Excel用KutoolsのSelect Range Helperで、選択範囲を除くすべての範囲を削除

Excel用Kutoolsの範囲をコピーして、選択範囲以外のすべてを削除


一度に複数の範囲をコピーして貼り付ける:

通常、Excelは複数のコピーをサポートしていませんが、 Kutools for Excelそのと 範囲のコピー 選択した複数の範囲をすばやくコピーして、必要に応じて他の場所に貼り付けることができます。

doc選択した11以外のすべてを削除する


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


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

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

doc選択した1以外のすべてを削除する

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

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

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

Sub ClearAllExceptSelection()
'updateby Extendoffice 20151113
    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 キーを押してこのコードを実行し、保存するセルの範囲を選択するよう促すプロンプトボックスが表示されたら、step1で範囲を選択した場合は OK、そうでない場合は、プロンプトボックスで必要なセルを選択し、カンマを入力して複数の範囲を区切り、をクリックします OK ボタン、スクリーンショットを参照してください:

doc選択した2以外のすべてを削除する

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

doc選択した3以外のすべてを削除する


Excel用KutoolsのSelect Range Helperで、選択範囲を除くすべての範囲を削除

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

Kutools for Excel : 300便利なExcelアドイン以上で、60日以内に自由に試してみてください.

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

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

2。 次に、をクリックします クツール > 選択します > 選択範囲ヘルパー、スクリーンショットを見る:

doc選択した4以外のすべてを削除する

3。 の中に 選択範囲ヘルパー ダイアログボックス、チェック 逆選択、スクリーンショットを見る:

doc選択した5以外のすべてを削除する

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

doc選択した6以外のすべてを削除する

5。 次に、ダイアログボックスを閉じて、 削除 キーを押して選択内容を一度に削除します。 あなたの望む細胞だけが保管されています。スクリーンショットをご覧ください:

doc選択した7以外のすべてを削除する

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


Excel用KutoolsのSelect Range Helperで、選択範囲を除くすべての範囲を削除

また、範囲のコピー of Kutools for Excel また、この作業を完了するのに役立ちます。選択した範囲を新しいワークシートにコピーしてから、古いワークシートを削除するだけで済みます。

Kutools for Excel : 300便利なExcelアドイン以上で、60日以内に自由に試してみてください.

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

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

2。 次に、をクリックします クツール > 範囲のコピー、スクリーンショットを見る:

doc選択した8以外のすべてを削除する

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

doc選択した9以外のすべてを削除する

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

doc選択した10以外のすべてを削除する

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

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


デモ:Kutools for Excelで選択範囲を除くすべてを削除する

Kutools for Excel200便利なExcelアドイン以上で、60日に制限なく試してみることができます。 今すぐダウンロードして無料トライアル!


Kutools for Excel-最高のOffice生産性向上ツールにより、生産性が80%向上

  • 再利用: すばやく挿入 複雑な数式、チャート そして、以前に使用したもの; セルを暗号化する パスワード付き メーリングリストの作成 そしてメールを送る...
  • スーパーフォーミュラバー (複数行のテキストや数式を簡単に編集する) レイアウトを読む (多数のセルを簡単に読んで編集できます)。 フィルター範囲に貼り付ける...
  • セル/行/列を結合 データを失うことなく; セルコンテンツの分割。 重複する行/列を結合する...重複セルの防止。 範囲の比較...
  • 重複または一意を選択します空白行を選択 (すべてのセルは空です)。 スーパー検索とファジー検索 多くのワークブックで。 ランダム選択
  • 完全コピー 式の参照を変更せずに複数のセル。 参照を自動作成 複数のシートに 箇条書きを挿入、チェックボックスなど
  • テキストを抽出、テキストの追加、位置による削除、 スペースを削除する; ページング小計の作成と印刷 セルのコンテンツとコメント間の変換...
  • スーパーフィルター (保存して他のシートにフィルタ方式を適用する)。 高度な並べ替え 月/週/日、頻度などによる。 特殊フィルター 太字、斜体で...
  • ワークブックとワークシートを組み合わせる; キー列に基づいて表をマージします。 データを複数のシートに分割する; xls、xlsx、およびPDFのバッチ変換...
  • 300を超える強力な機能。 Office / Excel 2007-2019および365をサポートします。 すべての言語をサポートします。 企業または組織に簡単に展開できます。 フル機能の60日間の無料トライアル。
KTEタブ201905

OfficeタブはOfficeにタブ付きインターフェイスを提供し、作業をより簡単にします

  • Word、Excel、PowerPointでタブ付き編集と読み取りを有効にする、出版社、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を50%向上させ、毎日数百回のマウスクリックを削減します。
オフィシタブ底
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.