Excel - 複数列にわたるセルの比較
Excelは、データ操作や複数のデータソースの比較に便利なツールです。 VBAと組み合わせると、Excelは面倒な作業を自動化するためのさらに強力なツールになります。 そのような例の1つは、 複数の列にわたるセルの値を比較することです。 マクロを使用すると、 列全体で昇順または降順で特定の値を探すようにコードをカスタマイズでき ます 。 ユーザーによって指定された基準が関連するセルと一致すると、このオフィスソフトウェアでのユーザーの必要性に従って強調表示されるか削除されることができます。
問題
AとBの2つの列があります
Aは値段が付けられたアイテムを持っています
Bには商品価格があります(ドル記号なし)
列Aの同じ商品の価格を比較して最低価格を削除するために、列の下に行くマクロを作成することは可能ですか?
例:
私が持っているもの:車100車200車300ボート50ボート60ボート500
欲しいもの:車300ボート500
リストはこれよりずっと長いです.....
溶液
それは重複する行を削除し(アイテムと価格が同じ場合)、そしてより低い価格を削除します...
ActiveSheet.AutoFilterModeの場合Cells.Select Selection.AutoFilterの場合Cells.Select Selectionを選択します。ソート_キー1:=範囲( "a2")、オーダー1:= xlAscending、_キー2:=範囲( "b2")、オーダー2:= xlDescending 、_ Header:= xlYes、OrderCustom:= 1、_ MatchCase:= False、Orientation:= xlTopToBottom、_ DataOption1:= xlSortNormal、_ DataOption2:= xlSortNormal lrow = 2しながら(Cells(lrow、1) "")If Cells(lrow、1)= Cells(lrow + 1、1)そしてRows(lrow + 1)。Delete Delete lrow = lrow + 1ループの終わり
注意
フォーラムでこのヒントを寄せてくれたrizvisa1に感謝します。