Hỏi cách lọc dữ liệu có điều kiện

[thivantan]

Tôi đang gặp một vấn đề nhờ các bạn giúp. Trong bảng số liệu hàng hoá tôi muốn lọc những dữ liệu có giá trị nhỏ hơn giá trị tại Ô G3. Rất mong các bạn giúp, xin chân thành cảm ơn.

 

[hoangminhtien]

Bạn xem file đính kèm có được không nhé!

 

[ndu96081631]

Dùng AutoFilter để trích lọc sướng hơn rất nhiều!

 

[thivantan]

Xin cảm ơn anh ndu96081631http://www.giaiphapexcel.com/forum/member.php?u=61139http://www.giaiphapexcel.com/forum/member.php?u=61139 và anh hoangminhtien, em đã làm được vấn đề mà em chưa hiểu. Theo cách hướng dẫn của anh ndu96081631http://www.giaiphapexcel.com/forum/member.php?u=61139http://www.giaiphapexcel.com/forum/member.php?u=61139 trong các bài viết trước đây, em đã thử thay .AutoFilter 2, Target bằng .AutoFilter 2, "<Target" nhưng không được. Nay em đã hiểu. Một lần nữa xin cảm ơn Anh rất nhiều.

 

[ndu96081631]

Xin cảm ơn anh ndu96081631 và anh hoangminhtien, em đã làm được vấn đề mà em chưa hiểu. Theo cách hướng dẫn của anh ndu96081631 trong các bài viết trước đây, em đã thử thay .AutoFilter 2, Target bằng .AutoFilter 2, "<Target" nhưng không được. Nay em đã hiểu. Một lần nữa xin cảm ơn Anh rất nhiều.

Vậy đâu có đúng ---> Phải là:
.AutoFilter 2, "<" & Target
Target (chính là cell bạn gõ điều kiện) mà bạn cho vào dấu ngoặc thì tiêu đời Target rồi còn gì (lúc đó nó trở thành chuổi ---> là chử Target ---> không có ý nghĩa gì cả)
Nói thêm:
- Với dử liệu ít, cở vài trăm dòng trở lại thì bạn dùng công thức không có vấn đề (hiểu thêm công thức là điều rất tốt)
- Với dử liệu vài ngàn dòng thì công thức bộc lộ 1 nhược điểm chết người: CHẬM ---> Khi ấy bạn dùng code với AutoFilter hoặc Advanced Filter làm chủ đạo là TUYỆT CÚ MÈO luôn ---> Tốc độ thuộc hàng khủng
Bạn thí nghiệm xem!

 

[thivantan]

ý của em trước đây theo hướng dẫn của anh trong việc lọc dữ liệu có giá trị nhất định thì sử dụng .AutoFilter 2, Target, sau đó em nghĩ là chỉ cần thay .AutoFilter 2, Target bằng .AutoFilter 2, "<Target" sẽ lấy được những giá trị nhỏ hơn. Nhưng nay anh đã làm cho em hiểu phải thay bằng .AutoFilter 2, "<" & Target . Cảm ơn anh rất nhiều.

 

[LinDan]

Bác Ndu ơi, cái dòng Option Explicit trong Code của bác dùng để làm gì thế? Vì tôi xoá đi nó vẫn chạy ngon mà. Nếu vậy có phải nó thừa không nhỉ?

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
  Application.ScreenUpdating = False
  If Target.Address = "$G$3" Then
    Range([G4], [I65536].End(xlUp)).ClearContents
    With Range("A2").CurrentRegion
      .AutoFilter 2, "<" & Target
      .Copy: Range("G4").PasteSpecial 3
    End With
    Sheet1.ShowAllData: Sheet1.AutoFilterMode = False: Target.Select
  End If
End Sub

 

[ndu96081631]

Bác Ndu ơi, cái dòng Option Explicit trong Code của bác dùng để làm gì thế? Vì tôi xoá đi nó vẫn chạy ngon mà. Nếu vậy có phải nó thừa không nhỉ?

Dòng ấy nó.. tự có (hổng phải tôi cho vào)
Trong cửa sổ lập trình, bạn vào menu Tools\Options, tab Editor và check mục "Require variable declaration"



Sau khi check xong, đóng Excel rồi mở trở lại. Từ giờ trở đi, mỗi khi mở cửa sổ code, dòng Option Explicit tự động được chèn vào đầu code
Option này có tác dụng kiểm tra xem các biến trong code đã khai báo chưa. Nếu "cố tình" không khai báo đủ (như code bạn hay viết) thì nó sẽ báo lỗi
Việc khai báo biến rất quan trọng:
- Giúp hổ trợ các tooltip mỗi khi gõ dấu chấm sau tên biến
- Giúp tiết kiệm bộ nhớ
vân vân...

 

[LinDan]

Chưa hình dung ra được

- Giúp hổ trợ các tooltip mỗi khi gõ dấu chấm sau tên biến
- Giúp tiết kiệm bộ nhớ

Xin bác Ndu phân tích rõ hơn để em có thể hiểu nó