Excel - So sánh các ô trên nhiều cột

Excel là một công cụ tiện dụng để thao tác dữ liệu và so sánh nhiều nguồn dữ liệu. Khi được kết hợp với VBA, Excel trở thành một công cụ thậm chí còn mạnh mẽ hơn để tự động hóa các công việc rườm rà mà có thể mất nhiều thời gian cho người dùng. Một ví dụ như vậy là so sánh các giá trị của các ô trên nhiều cột . Sử dụng macro người ta có thể tùy chỉnh mã để tìm kiếm các giá trị cụ thể theo thứ tự tăng dần hoặc giảm dần trên các cột . Khi các tiêu chí được chỉ định bởi người dùng phù hợp với các ô có liên quan, có thể đánh dấu hoặc xóa theo nhu cầu của người dùng trong phần mềm văn phòng này.

Vấn đề

Tôi có hai cột A và B

A có các mặt hàng đã được định giá

B có giá vật phẩm (không có ký hiệu đô la)

Có thể có một macro đi xuống cột để so sánh giá cho cùng một mặt hàng trong cột A và xóa giá thấp nhất không?

Thí dụ:

 Tôi có gì: xe 100 xe 200 xe 300 thuyền 50 thuyền 60 thuyền 500

 Những gì tôi muốn: xe 300 thuyền 500

Danh sách dài hơn nhiều so với điều này .....

Dung dịch

Nó sẽ xóa hàng trùng lặp (khi mặt hàng và giá là như nhau) và sẽ xóa giá thấp hơn ...

 If ActiveSheet.AutoFilterMode Then Cells.Select Selection.AutoFilter End If Cells.Select Selection.Sort _ Key1: = Range ("a2"), Order1: = xlAsceinating, _ Key2: = Range ("b2"), Order2: =, _ Tiêu đề: = xlYes, OrderCustom: = 1, _ MatchCase: = Sai, Định hướng: = xlTopToBottom, _ DataOption1: = xlSortN normal, _ DataOption2: = xlSortN normal lrow = 2 Do Các ô (lrow, 1) = Các ô (lrow + 1, 1) Sau đó Hàng (lrow + 1) .Delete Else lrow = lrow + 1 End If Loop