-
Tìm kiếm trong một khoảng thời gian bằng VBA
thanhtruong > 12-07-15, 01:16 PM
Tìm khắp trên diễn đàn. mà không thấy đúng ý mình nên mình tạo topic mới, có gì sai sót mong bỏ qua.
Tình hình là mình có 1 File tìm trên diễn đàn thuthuataccess.com như sau File demon
Hình ảnh:
Anh Chị xem hình ảnh tại đây
Giờ mình muốn sửa lại nút tìm kiếm một chứt: Làm sao tìm được thời gian vào Đảng từ ngày bất kỳ đến này bất kỳ thì phải làm sao?
Mong mọi người chỉ dẫn mình cách sửa code ở chổ nào? hay bổ sung ra sao ở nút tìm kiếm? -
RE: Tìm kiếm trong một khoảng thời gian bằng VBA
ongke0711 > 12-07-15, 02:55 PM
Bạn đặt tên cái textbox đến ngày là DenNgay sau đó vào code của nút [TÌM], tìm đến dòng s10 rồi thêm như bên dưới:
s10 = " AND ((t01DScanbo.Ngayvaodang)BETWEEN [t10] AND [DenNgay])"
-
RE: Tìm kiếm trong một khoảng thời gian bằng VBA
thanhtruong > 12-07-15, 04:21 PM
Cảm ơn bạn rất nhiều!
Cho mình hỏi luôn một tý nữa có được không?
Vậy giờ mình không muốn tìm trong 1 khoảng thời gian dd/mm/yyyy đến dd/mm/yyyy
mà mình tìm trong vòng 5 hay 10 hay 30 hay 60 ngày gần đây thì mình làm như thế nào? -
RE: Tìm kiếm trong một khoảng thời gian bằng VBA
thanhtruong > 14-07-15, 08:03 AM
không ai giúp tiếp mình nữa à, Mình nghĩ chủ đè của mình cũng mới mà, sao không có ai chỉ dẫn thêm nữa nhỉ? -
RE: Tìm kiếm trong một khoảng thời gian bằng VBA
tranthanhan1962 > 20-07-15, 09:09 PM
Căn cứ theo code ongke0711 giả sử thay [t10] bằng ngày hiện tại (ngày đang làm công việc tìm kiếm)
-Tìm 5 ngày trước s11 = " AND ((t01DScanbo.Ngayvaodang)BETWEEN date() AND (date()-5))"
-Tìm 10 ngày trước s12 = " AND ((t01DScanbo.Ngayvaodang)BETWEEN date() AND (date()-10))"
-Tìm 30 ngày trước (tức là ngày này tháng trước số ngày có thế giao động từ 28 - 31 ngày) s13 = " AND ((t01DScanbo.Ngayvaodang)BETWEEN date() AND (DateSerial(Year(Date()), Month(Date())-1, day(date()))"
-Tìm 60 ngày trước s14=" AND ((t01DScanbo.Ngayvaodang)BETWEEN date() AND (DateSerial(Year(Date()), Month(Date())-2, day(date()))"