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に感謝します。

前の記事 次の記事

トップのヒント