buithinhvan77
Thành viên thường trực




- Tham gia
- 18/8/10
- Bài viết
- 268
- Được thích
- 137
Nhờ các bạn giúp mình trích lọc điểm của HS yếu kém với, chứ cuối năm hay cuối kỳ mà đi rà soát kết quả của HS yếu kém thì ngại lắm!
(Xin giúp ở Sheet DSHS yếu kém)
Right Click vào Sheet "HOC SINH YEU KEM" ==> View Code ==> chép "thằng" này vào ==> Nhập điểm ở Sheet "HKI" ==> chuyển sang Sheet "HOC SINH YEU KEM" xem kết quảNhờ các bạn giúp mình trích lọc điểm của HS yếu kém với, chứ cuối năm hay cuối kỳ mà đi rà soát kết quả của HS yếu kém thì ngại lắm!
(Xin giúp ở Sheet DSHS yếu kém)
Private Sub Worksheet_Activate()
Dim Vung, Mg(1 To 60, 1 To 19), kK, Ws, I, J
Set Ws = Sheets("HKI"): Set Vung = Ws.Range(Ws.[b4], Ws.[b100].End(xlUp))
[a4:o64].ClearContents
kK = 1
For I = 1 To Vung.Rows.Count
If Vung(I).Offset(, 15) = "Y" & ChrW(7870) & "U" Or Vung(I).Offset(, 15) = "KÉM" Then
Mg(kK, 1) = Vung(I): Mg(kK, 16) = Vung(I).Offset(, 15): Mg(kK, 17) = Vung(I).Offset(, 16)
For J = 1 To 14
If Vung(I).Offset(, J) < 50 Then Mg(kK, J + 1) = Vung(I).Offset(, J)
Next
kK = kK + 1
End If
Next
[b4].Resize(kK, 19) = Mg
Range([b4], [b60].End(xlUp)).Offset(, -1) = [row(A:A)]
End Sub
Mọi người vẫn thích dùng code để lọc nhỉ? Tôi thì vẫn sử dụng công thức và một chút xíu cái gọi là "thủ thuật" thì đã giải quyết được rùi, đâu cần phức tạp đến thế!!!
Nếu bác dùng Công thức được thì cho em xin một bản để nghiên cứu, còn em thấy code của Concogia cũng tốt lắm rồi!!Mọi người vẫn thích dùng code để lọc nhỉ? Tôi thì vẫn sử dụng công thức và một chút xíu cái gọi là "thủ thuật" thì đã giải quyết được rùi, đâu cần phức tạp đến thế!!!
Có mấy ý kiến:Trogn bài trước, tôi có sơ suất khi gửi bài nên xin bổ sung file tôi nhờ các bạn giúp !
Bạn sửa công thức tại E4 thành =SUMPRODUCT((B9:B14<>"")*1) là được.Qua sự giúp đỡ của bạn "tinpkk", tôi đã thực hiện được việc thống kê của mình.
Nhưng...
Trong sheet "DS điều trị tại BV", trong phần "Tổng số người mắc bệnh", ở cell E4, kết quả thể hiện không đúng ! Cụ thể là trong danh sách không có 1 người nào nhưng trong cell E4 lại thể hiện là 5 ? Có phải chăng hàm Counta đếm luôn cả công thức trong vùng dữ liệu?
Nhờ các bạn giải giùm!
Cám ơn nhiều !
Tôi đã thực hiện theo hướng dẫn của bạn "nghiaphuc" và đã ra kết quả đúng theo yêu cầu.Bạn sửa công thức tại E4 thành =SUMPRODUCT((B9:B14<>"")*1) là được.
- Để đếm số nữ mắc bệnh chỉ cần dùng COUNTIF là được: =COUNTIF(E9:E14,">0")Tôi đã thực hiện theo hướng dẫn của bạn "nghiaphuc" và đã ra kết quả đúng theo yêu cầu.
Nhưng ở cell E5 "Trong đó số nữ mắc bệnh", thử sử dụng hàm Sumproduct lại cho ra kết quả giống như ở cell E4 ! Tôi vẫn chưa hiểu lý do nào xảy ra kết quả như vậy !
Sẵn đây, tôi cũng nhờ các bạn giúp thêm 1 vấn đề nữa là làm sao để không xuất hiện số 0 trong các cell không có dữ liệu (mà có cài công thức)
Trình độ Excel còn khá hạn chế nên rất mong các bạn giúp đỡ !
Trân trọng cám ơn các bạn !
Tặng bạn luôn nhé! Mon rằng công việc của bạn đỡ vất vả.Tôi đã thực hiện theo hướng dẫn của bạn "nghiaphuc" và đã ra kết quả đúng theo yêu cầu.
Nhưng ở cell E5 "Trong đó số nữ mắc bệnh", thử sử dụng hàm Sumproduct lại cho ra kết quả giống như ở cell E4 ! Tôi vẫn chưa hiểu lý do nào xảy ra kết quả như vậy !
Sẵn đây, tôi cũng nhờ các bạn giúp thêm 1 vấn đề nữa là làm sao để không xuất hiện số 0 trong các cell không có dữ liệu (mà có cài công thức)
Trình độ Excel còn khá hạn chế nên rất mong các bạn giúp đỡ !
Trân trọng cám ơn các bạn !
Bạn vào Format->Conditional mở lên là thấy định dạng trong đó ngay.( Có thể định dạng đến 4 màu trong đó cơ)Cám ơn thịnh tình của bạn "buithinhvan77" đã giúp tôi một file khá hoàn chỉnh, nhất là đã loại bỏ được việc xuất hiện số 0 trong bảng tính, mà không cần phải vào Tool để chỉnh nhưng tôi vẫn không tìm ra được bạn "buithinhvan77" đã làm bằng cách nào?
Bạn có thể giải thích để tôi mở mang đầu óc chút xíu, được không?