Chủ đề: Lọc chưa phù hợp với yêu cầu
-
09-25-2010, 10:20 PM #1Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 5
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 5091View more random threads:
- Lập trình VBA nhập môn
- Chơi games = excel
- Video hướng dẫn VBA cho người mới bắt đầu
- Tạo dòng cộng cuối trang sổ nhật ký chung bằng Excel
- [Nhờ giúp đỡ] Hàm chuyển số khối lượng (tấn, tạ, yến) thành chữ.
- Hướng dẫn Lập Công Thức Tách Dòng
- Căn đều dữ liệu bảng khi thay đổi số lượng các ô
- Nhờ sửa lỗi code VBA trong Sổ cái
- cong thuc nhap du lieu tu sheet nay sang sheet khac
- Xin giúp code nhập, chỉnh sửa, liên kết dữ liệu từ excel với form
-
09-26-2010, 02:09 AM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Lọc chưa phù hợp với yêu cầu
Gửi bởi phuyen89
="=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:
Mã nguồn PHP:[COLOR=#000000]
[/COLOR][COLOR=#007700]Private [/COLOR][COLOR=#0000BB]Sub Worksheet_Change[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ByVal Target [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"C11"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Select Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"A8:C65000"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]AdvancedFilter Action[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]xlFilterCopy[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]CriteriaRange[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]( [/COLOR][COLOR=#0000BB]_ [/COLOR][COLOR=#DD0000]"A1:C2"[/COLOR][COLOR=#007700]), [/COLOR][COLOR=#0000BB]CopyToRange[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"J8:L65000"[/COLOR][COLOR=#007700]), [/COLOR][COLOR=#0000BB]Unique[/COLOR][COLOR=#007700]:=[/COLOR][COLOR=#0000BB]False End Sub[/COLOR]
Lý ra phải vầy:
Mã nguồn PHP:[COLOR=#000000]
[/COLOR][COLOR=#007700]Private [/COLOR][COLOR=#0000BB]Sub Worksheet_Change[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]ByVal Target [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]) If [/COLOR][COLOR=#0000BB]Not Intersect[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"A1:C2"[/COLOR][COLOR=#007700]), [/COLOR][COLOR=#0000BB]Target[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Is Nothing Then Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"J8:L65000"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]Clear Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"A8:C65000"[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]AdvancedFilter 2[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"A1:C2"[/COLOR][COLOR=#007700]), [/COLOR][COLOR=#0000BB]Range[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"J8"[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]End [/COLOR][COLOR=#007700]If [/COLOR][COLOR=#0000BB]End Sub[/COLOR]
(nhớ rằng khi viết code hãy hạn chế mấy vụ Select đi nhé)
-
09-26-2010, 02:10 PM #3Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: 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!
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
Mình hỏi với.
If Not Intersect(Range("A1:C2"), Target) Is Nothing Then
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?
-
09-26-2010, 07:45 PM #4Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Lọc chưa phù hợp với yêu cầu
Gửi bởi phuyen89
- 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ì...
---------------------
Gửi bởi phuyen89
--------------------
Gửi bởi phuyen89
-
09-27-2010, 04:25 AM #5Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: 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?
-
09-28-2010, 03:05 AM #6Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Lọc chưa phù hợp với yêu cầu
Gửi bởi phuyen89
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)
-
09-28-2010, 04:28 AM #7Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Lọc chưa phù hợp với yêu cầu
Gửi bởi atmt17
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.
-
09-28-2010, 05:49 PM #8Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Lọc chưa phù hợp với yêu cầu
Gửi bởi phuyen89
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
-
09-28-2010, 06:29 PM #9Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: 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.
-
11-18-2010, 07:22 PM #10Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 1
Ðề: 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.
Kể với bác sĩ, anh M. cho biết bữa qua là sinh nhật của mình nên có đi ăn tối, rồi trở về nhà quan hệ tình dục với vợ. Trong quá trình quan hệ , vợ anh dùng miệng "tác động" nhiều vào vùng tinh hoàn....
Hy hữu. Anh chàng suýt mất tinh hoàn vì chơi bằng miệng với vợ