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

or

別のシートの条件に一致しない行を削除するにはどうすればよいですか?

同じシート上の条件と一致しない行を削除することは困難ではありませんが、以下に示すように、別のシート上の条件に一致しない行を削除する方法はわかります。 今すぐ私はあなたがそれを迅速に解決するのを助ける2つのトリックを持っています。

VBAで別のシートの基準に一致しない行を削除する

Kutools for Excelで別のシートの条件に一致しない行を削除する

doc-delete-based-another-sheet-1 doc-delete-based-another-sheet-2 doc-right doc-delete-based-another-sheet-3
基準(シート2) 前(シート1) 後(Sheet1)

OfficeタブOfficeでタブ付き編集とブラウジングを有効にし、作業をより簡単にします...
Kutools for Excelは、ほとんどの問題を解決し、生産性を80%向上させます
  • 何でも再利用: 最も使用されている式や複雑な式、チャート、その他をお気に入りに追加し、将来的にすぐに再利用できます。
  • 20以上のテキスト機能: テキスト文字列から数値を抽出します。 テキストの一部を抽出または削除します。 数字と通貨を英語の単語に変換...
  • マージツール:複数のワークブックとシートを1つに; データを失うことなく複数のセル/行/列を結合します。 重複する行と合計をマージ...
  • 分割ツール:値に基づいてデータを複数のシートに分割します。 1つのワークブックから複数のExcel、PDF、またはCSVファイル。 1列から複数列...
  • 貼り付けスキップ 非表示/フィルターされた行。 カウントアンドサム 背景色別; メーリングリストを作成し、 セルの価値でメールを送信する...
  • スーパーフィルター: 高度なフィルタースキームを作成し、任意のシートに適用します。 ソート 週、日、頻度などにより; フィルタ 太字、式、コメントで...
  • 300の強力な機能以上。 Office 2007-2019および365で動作します。 すべての言語をサポートしています。 企業または組織に簡単に展開できます。

矢印青い右の泡 VBAで別のシートの基準に一致しない行を削除する


VBAコードは、別のシートの条件に一致しない行を削除するのに役立ちます。

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

2。 ウィンドウで、をクリックします。 インセット > モジュール 新しいモジュールウィンドウを表示し、次のVBAコードをモジュールウィンドウにコピーします。

VBA:Excelで別のシートの条件に一致しない行を削除します。

Sub DeleteRow()
'Updateby20140618
Dim rng As Range
Dim Rng1 As Range, Rng2 As Range
Dim arr1 As Variant
Dim arr2 As Variant
Dim dic2 As Variant
Dim OutArr As Variant
xTitleId = "KutoolsforExcel"
Set Rng1 = Application.Selection
Set Rng1 = Application.InputBox("Range1 :", xTitleId, Rng1.Address, Type:=8)
Set Rng2 = Application.InputBox("Range2:", xTitleId, Type:=8)
Set Rng1 = Rng1.Columns(1)
Set Rng2 = Rng2.Columns(1)
Set dic2 = CreateObject("Scripting.Dictionary")
arr1 = Rng1.Value
arr2 = Rng2.Value
For i = 1 To UBound(arr2, 1)
    xKey = arr2(i, 1)
    dic2(xKey) = ""
Next
Rng1.ClearContents
OutArr = Rng1.Value
xIndex = 1
For i = 1 To UBound(arr1, 1)
    xKey = arr1(i, 1)
    If dic2.Exists(xKey) Then
        OutArr(xIndex, 1) = xKey
        xIndex = xIndex + 1
    End If
Next
Rng1.Value = OutArr
End Sub
3。 クリック ランKutoolsforExcel ダイアログボックスが表示され、条件に一致しない行を削除する範囲を選択できます。 スクリーンショットを見る:

doc-delete-based-another-sheet-4

4。 クリック OK別のシートの条件を選択するための別のダイアログが表示されます。スクリーンショットを参照してください:

doc-delete-based-another-sheet-5

5。 別のシートの条件と一致しないすべての行が削除されました。


矢印青い右の泡 Kutools for Excelで別のシートの条件に一致しない行を削除する

VBAコードが少し難しい場合は、Kutools for ExcelのCompare Ranges機能を試してみてください。

Kutools for Excel 300以上の便利なExcelツールが含まれています。 自由に30日に制限なしで試してみてください。 今すぐ入手

1。 条件に一致しない行を削除するシートを選択します。 クリック クツール > 範囲の比較。 スクリーンショットを見る:

doc-delete-based-another-sheet-6

2。 の中に 範囲の比較 ダイアログで、 範囲B必要な条件の範囲を選択することができます。 スクリーンショットを見る:

doc-delete-based-another-sheet-7
doc-arrow
doc-delete-based-another-sheet-8

3。 次に、をクリックします OK、その後に戻って 範囲の比較 ダイアログ、チェック 異なる価値 そして、 行全体を選択。 スクリーンショットを見る:

doc-delete-based-another-sheet-9

4。 クリック Ok、終了します 範囲の比較 ダイアログ。 次に、条件とは異なる値の行が選択されていることがわかります。

doc-delete-based-another-sheet-10

5。 右クリックしてクリック 削除 他のシート上の基準に合致しない行を削除するには、コンテキストメニューから選択します。

doc-delete-based-another-sheet-11

Kutools for ExcelのCompare Rangesの詳細については、こちらをクリックしてください。


関連記事:


Kutools for Excelは、ほとんどの問題を解決し、生産性を80%向上させます

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