Excel - Membandingkan sel merentas beberapa lajur

Excel adalah alat berguna untuk manipulasi data dan perbandingan sumber data berganda. Apabila digabungkan dengan VBA, Excel menjadi alat yang lebih berkuasa untuk mengautomasikan pekerjaan rumit yang mungkin mengambil masa yang lama untuk pengguna. Satu contoh sedemikian ialah membandingkan nilai-nilai sel merentasi pelbagai lajur . Menggunakan makro seseorang boleh menyesuaikan kod untuk mencari nilai khusus dalam urutan menaik atau menurun mengikut lajur . Sebaik sahaja kriteria yang ditetapkan oleh pengguna sepadan dengan sel - sel yang relevan, boleh sama ada diserlahkan atau dipadamkan mengikut kehendak pengguna dalam perisian pejabat ini.

Isu

Saya mempunyai dua lajur A dan B

A mempunyai item yang telah berharga

B mempunyai harga item (tiada tanda dolar)

Adakah mungkin untuk mempunyai makro yang turun lajur untuk membandingkan harga untuk item yang sama dalam lajur A dan padamkan harga terendah?

Contoh:

 Apa yang saya ada: kereta 100 kereta 200 kereta 300 bot 50 bot 60 bot 500

 Apa yang saya mahu: kereta 300 bot 500

Senarai ini jauh lebih panjang daripada ini .....

Penyelesaian

Ia akan memadamkan baris pendua (apabila item dan harga adalah sama) dan akan memadamkan harga yang lebih rendah ...

 Jika ActiveSheet.AutoFilterMode Kemudian Cells.Select Selection.AutoFilter End Jika Cells.Select Selection.Sort _ Key1: = Range ("a2"), Order1: = xlAscending, _ Key2: = Range ("b2"), Order2: = xlDescending, _ Header: = xlYes, OrderCustom: = 1, _ MatchCase: = False, Orientasi: = xlTopToBottom, _ DataOption1: = xlSortNormal, _ DataOption2: = xlSortNormal lrow = 2 Do While (Cells (lrow, Sel (baki, 1) = Sel (bongkok + 1, 1) Kemudian Baris (bocor + 1) .Delete Else lrow = lrow + 1 End If Loop