Sửa giùm lỗi của module: Hiển thị báo cáo theo điều kiện

[tamhoncuada10313]

Trong sheet3 tui có viết module BCTK cho nút báo cáo nhưng đang vướng mắc như sau:
- khi chọn lại điều kiện để báo cáo thì báo cáo cũ không bị xóa đi va báo cáo mới hiện ra liền ngay sau bên dưới.
- giờ muốn chọn tất cả thiết bị và tất cả phòng ban thì làm thế nào?

 

[tamhoncuada10313]

Form báo cáo thống kê của em không thể truyền số liệu để báo cáo ra sheet được.Bác nào biết tại sao chỉ giùm em với

 

[voda]

Nguyên văn bởi tamhoncuada10313
Form báo cáo thống kê của em không thể truyền số liệu để báo cáo ra sheet được.Bác nào biết tại sao chỉ giùm em với

Private Sub cmdbaocao_Click()
   If (Me.tungay = "" And Me.denngay = "") Then
       MsgBox "Hay nhap ngay thang vao", , "Thong bao"
   End If
   Exit Sub
         Sheet3.Range("D4").Value = Me.tungay.Value
         Sheet3.Range("F4").Value = Me.denngay.Value
    Call Baocao
End Sub

Vì câu lệnh Exit Sub đặt sai vị trí.

 

[tamhoncuada10313]

Bác ơi!giờ em đang vướng ở phần báo cáo ở chỗ là: em muốn lọc toàn bộ thiết bị hoặc xem toàn bộ cty thi thì phải làm thế nào ạ.

 

[voda]

-Trong chương trình của bạn, dữ liệu được lọc từ sheet2 sang sheet3 theo 3 điều kiện: Ngày tháng - Tên thiết bị - Phòng ban trong CT. Muốn lọc rộng hơn, bạn chỉ cần bớt các điều kiện lọc. Ví dụ: Muốn lọc toàn bộ thiết bị, ta lọc theo ngày tháng - phòng ban. Muốn lọc toàn công ty, ta lọc theo ngày tháng - thiết bị...
-Vấn đề này đã được đề cập đến rất nhiều trên diễn đàn. Bạn tìm và tham khảo nhé. Chúc thành công.