lọc dữ liệu với nhiều điều kiện và nhiều dữ liệu (2 người xem)

[boyxin]

Xin chào các anh chị
Tôi có một vấn đề cần nhờ sự giúp đỡ của diễn đàn.
Tôi muốn thực hiện 1 report để theo dõi tình trạng mua bán của 1 khách hàng (xem file đính kèm)
Vấn đề này có thể giải quyết bằng cách làm thủ công là filter sau đó copy and paste đến một sheet khác. tuy nhien cách này rất mất thời gian với 1 tệp dữ liệu tuong đối lớn và không smart lắm. Do vậy mong các anh chị chỉ giáo cho 1 đoạn code or 1 cách làm để tôi có thể thực hiện được công việc và học hỏi thêm.
Bên cạnh đó tôi cũng đang mày mò tự học viết marco and visual basic trong Excel va Access (Excel truoc) de thuc hien công việc quản lý của mình nên mong các anh chị giới thiệu cách học nhanh nhất cũng như một số bài code cụ thê có kèm minh hoạ. Tôi đang bat đầu mày mò với sách "Lap trinh với VBA trong Excel" của Anh Phan Tư Hướng. Quite newbie.
Trân trọng

Tập tin đính kèm

• 
  TEST.xls (24.0 KB)

Các bác ơi
Giúp mình thêm 1 tí nữa nào. Sau khi có sheet report rồi thì phát sinh thêm yêu cầu nữa la chia thành 2 sheet, 1 sheet la Mua, trong đó tập hợp mỗi một mã sẽ chỉ xuất hiện 1 lần, phần khối lượng và giá trị là sumif của từng mã hàng hoá, giá thì lấy trung bình. Tương tư chi sheet Bán,
Xem thêm file đính kèm.
Trân trọng

Tập tin đính kèm

• 
  TEST1112.xls (78.5 KB)

Với tất cả những yêu cầu như vầy thì theo mình: Không code + Không công thức = PivotTable

Không cần thêm Sheet Mua, Ban chi cho mệt. Vẫn có thể thống kê các kiểu bằng việc click vào những mũi tên và tuỳ chỉnh

 

[nguyenmanhnam]

Bạn xem file - có thể sử dụng đến 50,000 dòng (tôi đã đặt name động, nếu lớn hơn có thể chỉnh dữ liệu tùy dữ liệu của bạn)



To Ndu: có nhất thiết là phải "bán cái" không vậy? Những thứ này tôi còn phải học Bác, Bác lại paste sang không hà !

Em chào anh, em được nghe mọi người nó nhiều về Pivot Table nhưng đọc qua em chưa thành thạo lắm, anh làm ơn có thể thao tác quay màn hình bài này giúp em được không? Em xin cảm ơn nhiều.

 

[nguyenmanhnam]

Làm bài này nếu gọi là tuyệt cú mèo nhất thì đó phải là PIVOTTABLE ---> Bạn đã thử chưa? (không code, không công thức)

Sư phụ quay dùm em Video bài này với ah, cái vụ Pivot table lâu không làm bây giờ đọc lại em thấy khó khó thế nào ah.

 

[sususu064]

Xin chào các anh chị
Tôi có mọt file dữ liệu bán ra của Tập trong một tháng mà tôi muốn lọc những tập với một loại giá nhất định như là:[TABLE="width: 735"]
[TR]
[TD="colspan: 8"]Tôi muốn lọc những tập 200 trang giá thấp hơn 6.500, tập 100 trang già thấp hơn 5.500, tập 42 trang giá thấp hơn 3.500. vì trong một tháng bán ra cũng nhiều cho nên lọc thủ công rất mất thời gian. Vậy anh cho chỉ giáo cho đoan code hay là công thức để tôi có thể lọc được nhanh nhất. Rất mong nhận được sự hỗ trợ từ các anh chi.
Cám ơn anh chị nhiều và chờ tin của các anh chi.[/TD]
[/TR]
[/TABLE]

 

[quanluu]

Xin chào các anh chị
Tôi có mọt file dữ liệu bán ra của Tập trong một tháng mà tôi muốn lọc những tập với một loại giá nhất định như là:[TABLE="width: 735"]
[TR]
[TD="colspan: 8"]Tôi muốn lọc những tập 200 trang giá thấp hơn 6.500, tập 100 trang già thấp hơn 5.500, tập 42 trang giá thấp hơn 3.500. vì trong một tháng bán ra cũng nhiều cho nên lọc thủ công rất mất thời gian. Vậy anh cho chỉ giáo cho đoan code hay là công thức để tôi có thể lọc được nhanh nhất. Rất mong nhận được sự hỗ trợ từ các anh chi.
Cám ơn anh chị nhiều và chờ tin của các anh chi.[/TD]
[/TR]
[/TABLE]

http://www.giaiphapexcel.com/forum/...loại-hàng-và-theo-giá-trị&p=743924#post743924

 

[vo hong minh]

Xin chào các anh chị
Liên quan đến lọc nhiều điều kiện em cũng xin phép nhờ các anh chỉ giúp. Em có nhu cầu về lọc cột dân tộc trong danh sách. Ngoài 3 dân tộc chính : Kinh, Hoa, Khmer (em ở Tây Nam Bộ), em muốn lọc 1 nhóm các dân tộc khác ví dụ như : Mán, Mường, Thái v.v... thành 1 nhóm gọi là "dân tộc khác". Code em mò trên google như sau ạ:

Sub FilterArray()
Dim arr1(100) As String
Dim i As Integer
i = 1
For Each cell In Range("F1:F100")
If cell <> "Kinh" And cell <> "Hoa" And cell <> "Khmer" Then
arr1(i) = cell
i = i + 1
End If
Next
Range("F1:F100").AutoFilter Field:=2, _
Criteria1:=Array(arr1()), Operator:=xlFilterValues
'Field: =1 thi loc nhung doi thanh so khac thi khong loc bao loi " "autofilter method of range class failed" code 1004
'Nho cac anh, chi, cac thay giup dum em a. xin chan thanh cam on
End Sub

Vấn đề xảy ra là khi em đổi Field:= 2 hay 1 số nào đó khác 1 là báo lỗi autofilter method of range class failed
Vì em cũng không rõ lắm các thông số nên nhờ các anh chị giải thích giúp ạ. Em xin chân thành cám ơn !

 

[hoanganhvo2612]

Xin chào các anh chị
Liên quan đến lọc nhiều điều kiện em cũng xin phép nhờ các anh chỉ giúp. Em có nhu cầu về lọc cột dân tộc trong danh sách. Ngoài 3 dân tộc chính : Kinh, Hoa, Khmer (em ở Tây Nam Bộ), em muốn lọc 1 nhóm các dân tộc khác ví dụ như : Mán, Mường, Thái v.v... thành 1 nhóm gọi là "dân tộc khác". Code em mò trên google như sau ạ:

Sub FilterArray()
Dim arr1(100) As String
Dim i As Integer
i = 1
For Each cell In Range("F1:F100")
If cell <> "Kinh" And cell <> "Hoa" And cell <> "Khmer" Then
arr1(i) = cell
i = i + 1
End If
Next
Range("F1:F100").AutoFilter Field:=2, _
Criteria1:=Array(arr1()), Operator:=xlFilterValues
'Field: =1 thi loc nhung doi thanh so khac thi khong loc bao loi " "autofilter method of range class failed" code 1004
'Nho cac anh, chi, cac thay giup dum em a. xin chan thanh cam on
End Sub

Vấn đề xảy ra là khi em đổi Field:= 2 hay 1 số nào đó khác 1 là báo lỗi autofilter method of range class failed
Vì em cũng không rõ lắm các thông số nên nhờ các anh chị giải thích giúp ạ. Em xin chân thành cám ơn !

Range("F1:F100") chỉ có 1 cột F thì sao có field = 2 được?

 

[vo hong minh]

Range("F1:F100") chỉ có 1 cột F thì sao có field = 2 được?

Vâng cám ơn anh ạ, khổ em xem lại hiểu Field:= là số thứ tự của cột. Cảm ơn anh ạ, em cũng mù lắm mong anh thông cảm ạ