Trích lọc dữ liệu theo ngày tháng năm

Liên hệ QC

xuancong_2010

Thành viên mới
Tham gia
22/11/18
Bài viết
17
Được thích
3
em làm lọc dữ liệu theo ngày tháng trong khoảng từ ngày .... đến ngày ....
code ko biết sao k lọc được các bác xem và chỉnh giúp e với.
em xin cám ơn
 

File đính kèm

  • test (1).xlsb
    37.9 KB · Đọc: 12
Bạn xem lại xem.
Mình mới viết lại code theo ý mình
bạn ơi mình thử mà vẫn chưa được bạn xem lại code hộ mình với
Bài đã được tự động gộp:

Bạn xem lại xem.
Mình mới viết lại code theo ý mình
nghĩa là hiện tại khi cho chạy để lấy dữ liệu mà nó k lấy và lọc đc kết quả từ Sheets "Data" sang sheet "Tonghop"
 
Upvote 0
em làm lọc dữ liệu theo ngày tháng trong khoảng từ ngày .... đến ngày ....
code ko biết sao k lọc được các bác xem và chỉnh giúp e với.
em xin cám ơn
code bạn thiếu điều kiện so sánh giá trị ngày trong cột C sheet tonghop với Từ ngày - đến ngày. bạn xem thử code sau khi thêm điều kiện and vào Private Sub ComboBox1_Change()
...
Dim Min_date, Max_date ' thêm Tu ngay, den ngay
Min_date = tonghop.Range("H1") 'de so sanh voi Tu ngay
Max_date = tonghop.Range("J1") 'de so sanh voi Den ngay
If ComboBox1.Value = arrdt(i, 4) And arrdt(i, 1) >= Min_date And arrdt(i, 1) <= Max_date Then
...
 

File đính kèm

  • Edit test.xlsb
    45.6 KB · Đọc: 8
Upvote 0
bạn ơi mình thử mà vẫn chưa được bạn xem lại code hộ mình với
Bài đã được tự động gộp:


nghĩa là hiện tại khi cho chạy để lấy dữ liệu mà nó k lấy và lọc đc kết quả từ Sheets "Data" sang sheet "Tonghop"
Mình gửi lại file
 

File đính kèm

  • test (1).xlsb
    40.4 KB · Đọc: 8
Upvote 0
xin bạn giúp mình tiếp là:
khi trường hợp chọn có điều kiện ở combox1 như bạn làm đã chạy.
nhưng nếu combox1 mà để trống thì lại ko tìm kiếm được trong khoảng thời gian kia.
mong bạn giúp đỡ thêm và cám ơn bạn đã hộ trợ
 
Upvote 0
Trước mắt thì thấy "đờn gảy tai trâu". Nhưng có lẽ do bạn không phải "cao thủ". Ở bậc ấy chắc nói người ta nghe liền.
mình mới sang excel học được một tuần, còn code đọc mình vẫn hiểu @@
em mới tham gia nên chưa rõ mong thông cảm, mong ad chuyển bài sang đúng ngăn hộ em
 
Upvote 0
code bạn thiếu điều kiện so sánh giá trị ngày trong cột C sheet tonghop với Từ ngày - đến ngày. bạn xem thử code sau khi thêm điều kiện and vào Private Sub ComboBox1_Change()
...
Dim Min_date, Max_date ' thêm Tu ngay, den ngay
Min_date = tonghop.Range("H1") 'de so sanh voi Tu ngay
Max_date = tonghop.Range("J1") 'de so sanh voi Den ngay
If ComboBox1.Value = arrdt(i, 4) And arrdt(i, 1) >= Min_date And arrdt(i, 1) <= Max_date Then
...


cám ơn hai bác em đã làm xong và code đã chạy được rồi
 
Upvote 0
Web KT

Bài viết mới nhất

Back
Top Bottom