Lọc chưa phù hợp với yêu cầu

[sinhvienpy89]

Các bạn cho mình hỏi.
Trong bộ phận của mình có S, SA, SX, SN và nhiều bộ phận có chữ S đứng đầu nữa(Ví dụ thôi.)
Mình dùng AdvanFileter để lọc, nhưng khi điều kiện là S thì nó tìm tất cả.
DK là S? thì nó tìm thêm một ký tự sau S nữa.Mà mãi mình chưa tìm được cách nào để tìm S duy nhất.Mong các bạn giúp đỡ.
Đây là ví dụ minh họa:
View attachment 5091

 

[atmt17]

Ðề: Lọc chưa phù hợp với yêu cầu

Các bạn cho mình hỏi.
Trong bộ phận của mình có S, SA, SX, SN và nhiều bộ phận có chữ S đứng đầu nữa(Ví dụ thôi.)
Mình dùng AdvanFileter để lọc, nhưng khi điều kiện là S thì nó tìm tất cả.
DK là S? thì nó tìm thêm một ký tự sau S nữa.Mà mãi mình chưa tìm được cách nào để tìm S duy nhất.Mong các bạn giúp đỡ.
Đây là ví dụ minh họa:
View attachment 5091

Điều kiện tại B2, nếu bạn gõ:
="=S" thì nó sẽ chỉ lọc S
="=SA" thì nó sẽ chỉ lọc SA
vân vân
Sao không xem Help của Excel nhỉ? Nó chỉ rất rõ ràng vụ này đấy!
Ngoài ra, code của bạn dùng sự kiện Worksheet_Change chưa đúng lằm
Code của bạn:

Private Sub Worksheet_Change(ByVal Target As Range)
  Range("C11").Select
  Range("A8:C65000").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _
        "A1:C2"), CopyToRange:=Range("J8:L65000"), Unique:=False
End Sub

Chẳng ràng buột điều kiện cho Target gì cả nên bạn làm gì trên sheet thì code cũng chạy
Lý ra phải vầy:

Private Sub Worksheet_Change(ByVal Target As Range)
  If Not Intersect(Range("A1:C2"), Target) Is Nothing Then
    Range("J8:L65000").Clear
    Range("A8:C65000").AdvancedFilter 2, Range("A1:C2"), Range("J8")
  End If
End Sub

Tức khi có tác động tại vùng A1:C2 thì code mới chạy
(nhớ rằng khi viết code hãy hạn chế mấy vụ Select đi nhé)

 

[sinhvienpy89]

Ðề: Lọc chưa phù hợp với yêu cầu

Cảm ơn nó đã lọc đúng yêu cầu.

Sao không xem Help của Excel nhỉ? Nó chỉ rất rõ ràng vụ này đấy!

Mình không biết gõ từ Tiếng anh gì vào cái Ô question nên nó kiếm không ra bạn ah.Bạn có bí quyết tìm trong Help thì gợi ý mình với.

Chẳng ràng buột điều kiện cho Target gì cả nên bạn làm gì trên sheet thì code cũng chạy

Hèn chi mình chỉ nhập liệu thôi mà nó cũng cũng chạy luôn, khổ gần chết.

Mình hỏi với.

If Not Intersect(Range("A1:C2"), Target) Is Nothing Then

Not intersect có ý nghĩa gì vậy bạn.

Mình nhìn Code của bạn hình như là sau khi đánh xong vào vùng Criteria thì nó tiến hành xóa cái Range("J8:L65000") thì phải, sau đó thì nó tạo lại đúng không?

 

[atmt17]

Ðề: Lọc chưa phù hợp với yêu cầu

Mình hỏi với.
Not intersect có ý nghĩa gì vậy bạn.

Giải thích từ từ
- Intersect(Range1, Range2) có nghĩa là vùng dữ liệu "chung" giữa Range1 và Range2
Ví dụ
Intersect(Range("A15"), Range("C3:F7")) là vùng dữ liệu "chung" cua A15 và C3:F7, tức C35
If Not Intersect(Range("A1:C2"), Target) Is Nothing Then, câu này có thể diễn nôm như sau: Nếu cell Target (là cell tôi gõ) nằm trong vùng A1:C2 thì...
---------------------

Mình nhìn Code của bạn hình như là sau khi đánh xong vào vùng Criteria thì nó tiến hành xóa cái Range("J8:L65000") thì phải, sau đó thì nó tạo lại đúng không?

Đương nhiên phải xóa vùng lọc cũ đi và thay vùng lọc mới vào chứ
--------------------

Mình không biết gõ từ Tiếng anh gì vào cái Ô question nên nó kiếm không ra bạn ah.Bạn có bí quyết tìm trong Help thì gợi ý mình với.

Vào menu Help, chọn Microsoft Excel Help... Trong hộp Search For, gõ từ cần tìm hiểu... Ví dụ ở đây ta sẽ gõ từ Advanced Filter

 

[sinhvienpy89]

Ðề: Lọc chưa phù hợp với yêu cầu

Ah mà cũng cái vụ lọc này, mình làm 2 thí nghiệm sau, mình làm Validation nhưng không có liên kết nó với bất kỳ cái gì, thì mình có thể gõ được tài khoản.
Nhưng trong file trên, mình phải dùng chuột để chọn nó mới chụi, chứ cũng tài khoản đó,nhưng mình đánh vào thì nó lại không chụi.Bạn có biết Nguyên nhân vì sao không?

 

[atmt17]

Ðề: Lọc chưa phù hợp với yêu cầu

Ah mà cũng cái vụ lọc này, mình làm 2 thí nghiệm sau, mình làm Validation nhưng không có liên kết nó với bất kỳ cái gì, thì mình có thể gõ được tài khoản.
Nhưng trong file trên, mình phải dùng chuột để chọn nó mới chụi, chứ cũng tài khoản đó,nhưng mình đánh vào thì nó lại không chụi.Bạn có biết Nguyên nhân vì sao không?

Chưa hình dung rõ lắm (thông cảm, tôi hơi ngu)
Thôi thì bạn cứ làm cái Validation gì đó như bạn nói rồi gữi lên đây xem thử (nhớ nói rõ trong file nha)

 

[sinhvienpy89]

Ðề: Lọc chưa phù hợp với yêu cầu

Chưa hình dung rõ lắm (thông cảm, tôi hơi ngu)
Thôi thì bạn cứ làm cái Validation gì đó như bạn nói rồi gữi lên đây xem thử (nhớ nói rõ trong file nha)

Bạn xem 2 cái File này.
FIle HTTK thì gõ vào cái Validation không được
Còn File Minhoa thì nó gõ được, rất thuận tiền.

 

[xuanthanh]

Ðề: Lọc chưa phù hợp với yêu cầu

Bạn xem 2 cái File này.
FIle HTTK thì gõ vào cái Validation không được
Còn File Minhoa thì nó gõ được, rất thuận tiền.

Em xem lại, cả hai file trên tôi không thể nào gõ được nếu sai TK đã được quy định trong Inbox name


Ah!!! Em vào Data/Validation/Input Message sẽ thấy. Tự tìm hiểu nhé, không hiểu, hỏi tiếp. Xem thêm phần định dạng(Format Cells).
Em có thể tham khảo thêm ở đây
Trang ch? - H??ng d?n s? d?ng Data Validation
Thân

 

[sinhvienpy89]

Ðề: Lọc chưa phù hợp với yêu cầu

Hiểu rồi, cái TK em định dạng là Text, nếu mình gõ vào là nó sẽ hiện thị dạng Number thì nó sẽ không chui, chỉ cần chỉnh sửa lại cái Cell mà em đặt làm Validation sao cho phù hợp là được.Cảm ơn anh.

 

[lahan]

Ðề: Lọc chưa phù hợp với yêu cầu

nếu k phiền có thể bỏ cảnh báo tài khoản trong input là có thể gõ trực tiếp vào đc.