Lọc dữ liệu trùng nhiều lên đầu. (2 người xem)

[Ls1102]

Em muốn lọc số trùng nhiều nhất lên đầu , số trùng ít xuống dướiVD : như cột b : 4 số 9 trùng nhau lên đầu, 3 số 8 thứ 2 ..... . 1 số 1 đứng cuối.
Thanks đã đọc bài

 

[giao_nguyenthat]

Thực ra yêu cầu của bạn có thể làm đơn giản như sau:
+ Bạn thêm một cột phụ, tại cột phụ bạn dùng hàm countif để đếm số lần trùng của từng loại
+ Sau đó bạn tiến bạn Soft ở cột phụ từ lớn đến nhỏ bạn sẽ có kết quả như ý muốn

Bạn vui lòng xem file đính kèm


Chúc bạn thành công./

 

[ChanhTQ@]

Mình thực hiện ghi macro theo í tưởng của bạn Giao_NguyenThat;281920 (có chỉnh sửa)

Option Explicit
Sub GPE()
 Dim eRw As Long
 
 Columns("B:B").Select:             eRw = [B65500].End(xlUp).Row
 Selection.Insert Shift:=xlToRight
 ActiveCell.FormulaR1C1 = "=COUNTIF(R1C[1]:R" & eRw & "C[1],RC[1])"
 [B1].Select
 Selection.AutoFill Destination:=[B1].Resize(eRw), Type:=xlFillDefault
 Columns("B:C").Select
 Selection.Sort Key1:=Range("B1"), Order1:=xlDescending, Header:=xlGuess, OrderCustom:=1
 
 Columns("B:B").Select
 Selection.Delete Shift:=xlToLeft

End Sub

Cách dùng: Chép toàn bô cái ni vô cửa sổ VBE; Có thể gán cho nó tổ hợp fím tắt như {CTRL}+{SHIFT} + G

Sau đó chỉ việc bấm tổ hợp đó khi muốn.

Chúc cuối tuần vui vẻ

 

[Ls1102]

Minh Làm được rùi cảm ơn các bạn