Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Hỏi] Tìm kiếm trong một khoảng thời gian bằng VBA
#1
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?
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#2
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])"

[Hình: suaCode.png]
Chữ ký của ongke0711 If you BORN poor, it's not your mistake. But if you DIE poor, It's your mistake!
ღღღღღTài sản của ongke0711 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn thanhtruong
#3
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?
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#4
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ỉ?
Chữ ký của thanhtruong Xin chào, mình là thanhtruong, Tham gia http://thuthuataccess.com/forum từ ngày 23-06 -14.
Reply
Những người đã cảm ơn
#5
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()))"
Chữ ký của tranthanhan1962 Kết quả cuối cùng của một đời người, không phải bạn có được bao nhiêu tiền bạc, tài sản. Mà bạn còn bao nhiêu người bạn  thumbs up
ღღღღღTài sản của tranthanhan1962 (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tự chọn 1 trong 2 filed Giá theo điều kiện Global_virus 1 93 22-07-17, 03:05 AM
Bài mới nhất: cpucloi
  [Help] Về việc in ấn trong Access JJKey 10 382 09-06-17, 12:37 PM
Bài mới nhất: tranthanhan1962
  [Help] hàm edate trong access anhnt 2 150 13-05-17, 07:03 PM
Bài mới nhất: anhnt
  Xin giúp liên kết đường dẫn trong access audition 14 5,658 11-05-17, 11:50 AM
Bài mới nhất: cpucloi
  [Hỏi] Cách sử dụng ACCDB trong mạng LAN nhiều phiên bản Access. toancvp 9 423 10-05-17, 06:29 PM
Bài mới nhất: toancvp

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ