Xin giúp về trích lọc điểm hs yếu kém

[ngchuong60]

Xin cám ơn bạn Minh Cong !

xin cám ơn bạn Minh Cong đã giúp giải đáp nhưng có lẽ do tôi trình bày không rõ nên đáp án của bạn trở nên quá dễ dàng với tôi (!!)
Thật sự trong sheet "Danh sách" chỉ là nơi nhập dữ liệu cần thiết để cung cấp số liệu tổng hợp và phân loại chi tiết các loại bệnh cho các sheet khác trong file.. Chứ nếu đơn giản như bạn Minh Công hiểu thì đã không còn là vấn đề để tôi phải nhờ sự hỗ trợ, giúp đỡ từ các bạn !

 

[dvu58]

Đầu năm chúc các bạn ngày càng thăng tiến trong sự nghiệp và trong Excel nhé !
Hôm nay, tôi tiếp tục làm phiền các bạn nữa đây !
1/ Số là cơ quan có yêu cầu tôi làm sao có ngay số liệu thống kê trong các biểu mẫu ở các sheet "BC tổng hợp", chủ yếu là tổng hợp từ sheet "Danh sách" ra chi tiết từng loại sức khỏe I, II, III, IV, V cho từng ngành nghề, từng chuyên khoa...
2/ Trong sheet "DS điều trị tại BV", hiện giờ tôi có chừa ra khoảng gần 200 dòng để nhận kết xuất từ sheet "Danh sách". Vấn đề đặt ra là số lượng 200 dong thì quá nhiều, khi in ra lại không cần thiết cho những dòng còn trống. Làm sao khi kết xuất xong thì Excel có thể ngắt ngay sau người cuối cùng trong sheet "DS điều trị tại BV" này?
Tôi gửi file kèm theo để nhờ các bạn giúp đỡ ! Tôi đã giản lược bớt những cột mục để các bạn dễ nhìn và giúp tôi !
Xxin cám ơn trước sự giúp đỡ của các bạn !

Bạn xem thử, như thế này là đúng ý bạn chưa?
(File đính kèm)

 

[dvu58]

Gửi lại file có điều chỉnh

Gởi lại file không được nữa rồi (hết quota) vậy bạn sửa code (của Sub Worksheet_Activate của sheet: DS điều trị tại BV) trong file Thong ke.xls lại dùm một chút cho gọn:

đoạn for .... next thay bằng

  For i = 9 To 15
            If ds.Cells(r, i) <> "" Then
                t = ", "
                Else
                t = ""
            End If
                cd = cd & ds.Cells(r, i) & t
        Next

 

[ngchuong60]

Điều chỉnh lại giùm !

Tôi có cảm nhận hình như bạn "dvu58" đi guốc trong bụng tôi khi giải quyết vấn đề của tôi chỉ trong nháy mắt và chính xác theo yêu cầu. Thành thật cảm ơn bạn !
Tuy vậy, tôi cũng nhờ bạn hướng dẫn thêm 1 vài vấn đề sau đây để tôi có thể hoàn chỉnh theo yêu cầu của sếp:
1/ Như đã trình bày, tôi đã giản lược bớt để các bạn dễ nhìn ra vấn đề của tôi nên có lẽ vì vậy bạn dvu58 đã hiểu nhầm trong thiết lập công thức kết xuất ra dữ liệu ở mục "Chẩn đoán" trong sheet "DS điều trị tại Bệnh viện" mà đúng ra trong sheet "Danh sách" tôi phải đưa ra cột "Chẩn đoán".
Thành thật xin lỗi bạn dvu58, đây là lỗi của tôi !
Nhân đây, cũng cho tôi được hỏi thêm: Tôi đã tìm để sửa chữa nhưng không rõ bạn dvu58 sử dựng công thức hoặc code nào để kết xuất ra mục "Chẩn đoán" ở trên tôi đã đề cập ?
2/ Tôi có thể copy code của sheet "DS điều trị tại BV" sang 1 sheet khác có biểu mẫu giống như vậy (mà vì giản lược tôi đã xóa bớt đi) được không? Tôi có cần phải chỉnh sửa gì để sử dụng code trong sheet khác? (Tôi mới chỉ biết i tờ về excel !)
Vài thắc mắc, mong bạn hướng dẫn thêm !

 

[dvu58]

Tôi có cảm nhận hình như bạn "dvu58" đi guốc trong bụng tôi khi giải quyết vấn đề của tôi chỉ trong nháy mắt và chính xác theo yêu cầu. Thành thật cảm ơn bạn !
Tuy vậy, tôi cũng nhờ bạn hướng dẫn thêm 1 vài vấn đề sau đây để tôi có thể hoàn chỉnh theo yêu cầu của sếp:
1/ Như đã trình bày, tôi đã giản lược bớt để các bạn dễ nhìn ra vấn đề của tôi nên có lẽ vì vậy bạn dvu58 đã hiểu nhầm trong thiết lập công thức kết xuất ra dữ liệu ở mục "Chẩn đoán" trong sheet "DS điều trị tại Bệnh viện" mà đúng ra trong sheet "Danh sách" tôi phải đưa ra cột "Chẩn đoán".
Thành thật xin lỗi bạn dvu58, đây là lỗi của tôi !
Nhân đây, cũng cho tôi được hỏi thêm: Tôi đã tìm để sửa chữa nhưng không rõ bạn dvu58 sử dựng công thức hoặc code nào để kết xuất ra mục "Chẩn đoán" ở trên tôi đã đề cập ?
2/ Tôi có thể copy code của sheet "DS điều trị tại BV" sang 1 sheet khác có biểu mẫu giống như vậy (mà vì giản lược tôi đã xóa bớt đi) được không? Tôi có cần phải chỉnh sửa gì để sử dụng code trong sheet khác? (Tôi mới chỉ biết i tờ về excel !)
Vài thắc mắc, mong bạn hướng dẫn thêm !

Bạn Up lại file Thong ke.xls với các cột mục đầy đủ (Chẩn đoán) để tôi chỉnh lại code.
Trong code, tôi dùng vòng lặp for ... next để duyệt hết các cột khám bệnh, chẩn đoán của sheet Danh sách (như tôi lầm đoán).

Ngoài ra, bạn có thể lấy code của sheet DS điều trị tại BV cho các sheet khác, với điều kiện bạn phải chỉnh lại chút ít (Set ds= sheet ?) và các cột mục lấy giá trị phải tương ứng.

Bạn nhớ gửi cho tôi địa chỉ Email để tôi gửi file điều chỉnh cho bạn (vì tôi hết quota nên khôi gửi qua diễn đàn được)

 

[ngchuong60]

Bổ sung file !

Cám ơn thịnh tình của bạn dvu58 đã nhiệt tình giúp đỡ tôi !
Tôi xin gửi lại file đầy đủ để bạn có thể hoàn chỉnh giùm !
Địa chỉ mail của tôi là ngchuong60@yahoo.com !
Rất cám ơn bạn !

 

[dvu58]

Cám ơn thịnh tình của bạn dvu58 đã nhiệt tình giúp đỡ tôi !
Tôi xin gửi lại file đầy đủ để bạn có thể hoàn chỉnh giùm !
Địa chỉ mail của tôi là ngchuong60@yahoo.com !
Rất cám ơn bạn !

File bị nhiễm virus. Làm xong rồi mà không gửi được.
Chờ quét virus xong đã