kevin_mn
Thành viên chính thức
- Tham gia
- 7/7/08
- Bài viết
- 56
- Được thích
- 0
Công thức tại Cell D4 :Chào các Bác,
Em có một bảng dữ liệu, muốn dùng hàm để liệt kê đối tượng nào xuất hiện nhiểu nhất, nhiều thứ 2, thứ 3...
nhưng chưa tìm ra cách . Các Bác kham khảo chỉ giáo !
FIle đính kèm !
=INDEX(Data,MATCH(LARGE(IF(COUNTIF($D$3:D3,Data)=0,COUNTIF(Data,Data),""),1),COUNTIF(Data,Data)*(COUNTIF($D$3:D3,Data)=0),0))
Bạn thử cái này xem khắc phục được không nhé :cái nay hơi nặng với những cột có dữ liệu khoảng 5000 cell hoamattroicoi ơi. Ai có cách nao ngắn gon hơn không giúp đỡ gium với
Sub ExtrData()
Dim Dic As Object, i As Long, k As Long
Dim Arr(), dArr()
Set Dic = CreateObject("Scripting.Dictionary")
Arr = Range("B2:B" & [B65536].End(xlUp).Row).Value
ReDim dArr(1 To UBound(Arr, 1), 1 To 2)
For i = 1 To UBound(Arr, 1)
If Arr(i, 1) <> "" And Not Dic.exists(Arr(i, 1)) Then
k = k + 1
Dic.Add Arr(i, 1), k
dArr(k, 2) = Arr(i, 1)
dArr(k, 1) = 1
Else
dArr(Dic.Item(Arr(i, 1)), 1) = dArr(Dic.Item(Arr(i, 1)), 1) + 1
End If
Next
If k Then
With [D2].Resize(k, 2)
.Value = dArr
.Sort Key1:=Range("D2"), Order1:=xlDescending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False
End With
End If
End Sub
cái nay hơi nặng với những cột có dữ liệu khoảng 5000 cell hoamattroicoi ơi. Ai có cách nao ngắn gon hơn không giúp đỡ gium với
Hiccccc... Em cảm ơn các Bác nhưng khoản VBA Em hơi dốt nên muốn sử dụng các hàm trong excel cho dễ sử dụng. với lại Em muốn dữ liệu tự động nhảy mỗi lần cập nhật thêm mà không phải bấm nút ah. có Bác nào giúp dc Em không ah.?
Hiccccc... Em cảm ơn các Bác nhưng khoản VBA Em hơi dốt nên muốn sử dụng các hàm trong excel cho dễ sử dụng. với lại Em muốn dữ liệu tự động nhảy mỗi lần cập nhật thêm mà không phải bấm nút ah. có Bác nào giúp dc Em không ah.?
Sao bạn không nghĩ đến PivotTable nhỉ? Đừng nói là 5,000 dòng, cho dù 50,000 dòng thì PivotTable cũng ra kết quả trong nháy mắt
Được cái đây là công cụ có sẵn, nhìn sơ qua cũng biết cách làm, khỏi công thức hay code chi cho mất công nặng đầu
To thày Ndu: Sao em thấy thày làm thế nào mà xuất hiện được cả hình Video lên trong khi em không làm được. Xin thày chỉ giúp cho.
EM dùng office 2007 làm theo cách của bác nó ra thế này nè
Nhưng các Bac Ơi Vipot table có vẻ cũng không đáp ứng được yêu cầu của Em ah. Em chỉ cần lọc ra 10 cái tên xuất hiện nhiều nhất chứ không phải liệt kê tất cả ah. các pac xem att nhe
những thông tin ấy Em lấy ở một bảng thông tin khác Bác ah. trong file quan lý xe của Em còn nhiều thứ khác nữa. cái đó Em chỉ đưa ra để ví dụ thôi ah.
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 1
DIỄN ĐÀN GIẢI PHÁP EXCEL Group 2