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:
- Nhập ngày hiện tại ở bất kỳ Cell nào bằng Calendar
- EMBED("Forms.ComboBox.1","")
- tác giả phần mềm kế toán
- Đọc số thành chữ tự động nhận dạng bảng mã
- Nhờ thiết lập VBA lấy dữ liệu tự động
- cách tự tạo sổ phần mềm excel kế toán
- Hướng dẫn Lập Công Thức Tách Dòng
- Chuyển kết quả bấm thẻ sang bảng chấm công
- viết code xong nhưng không thực thi lệnh
- Tặng các bạn ScrollText - Cuộn chữ: lên, xuống, trái phải,...
-
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.
Dự án căn hộ cao cấp Vinhomes Central Park xây dựng bởi VinGroup tận hưởng cuộc sống khu trung tâm thiết kế vượt trội. Vinhomes Vinhomescentralparktc tận hưởng cuộc sống thiết kế mở tiện nghi vượt...
Khu đô thị Vinhomes Central Park khu yên tĩnh