Tìm kiếm và trích dữ liệu (1 người xem)

[changngoc]

Chào các anh. Mình có một sheet dữ liệu tổng hợp, tại sheet timkiem, mình gõ chuỗi dữ liệu tìm kiếm 1 trong 03 điều kiện thì sẽ trích xuất ra bảng tương ứng ( Yêu cầu chi tiết và dễ hiểu tại file đính kèm). Mong nhận được sự giúp đỡ từ các ACE. Chân thành cảm ơn!

 

[ChanhTQ@]

Bạn xem trong file kèm theo

​

​

 

[Hai Lúa Miền Tây]

Chào các anh. Mình có một sheet dữ liệu tổng hợp, tại sheet timkiem, mình gõ chuỗi dữ liệu tìm kiếm 1 trong 03 điều kiện thì sẽ trích xuất ra bảng tương ứng ( Yêu cầu chi tiết và dễ hiểu tại file đính kèm). Mong nhận được sự giúp đỡ từ các ACE. Chân thành cảm ơn!

Xin mượn cái Validation của anh Chanh Trung Quốc để lọc = Autofilter như sau:

Sub tim()
[A7:E60].ClearContents
With Sheet3.Range("A2:L60")
    .AutoFilter Val(Left([B3], 1)) + 1, "*" & [c3] & "*": .Copy [A7]
End With
Sheet3.ShowAllData
End Sub

 

[changngoc]

Cảm ơn các anh.

@ anh ChanhTQ: file của anh chưa đáp ứng các vấn đề: (i) Đừng phân biệt chữ hoa, chữ thường; (ii) Nhập chữ "H" thì kết quả không đúng.

@ Bạn Hailuamientay: Nhờ bạn chỉnh sửa: (i) Sắp xếp số thứ tự 1,2,3,4...; (ii) nhập chữ "i" hoặc chữ "l" thì kết quả ra không đúng ( kết quả ra các đại lý khác luôn).

Thanks;

 

[Hai Lúa Miền Tây]

@ Bạn Hailuamientay: Nhờ bạn chỉnh sửa: (i) Sắp xếp số thứ tự 1,2,3,4...; (ii) nhập chữ "i" hoặc chữ "l" thì kết quả ra không đúng ( kết quả ra các đại lý khác luôn).

(i). Chỉnh lại code như sau:

Sub tim()
[A7:E100].Clear
With Sheet3.Range("A2:L60")
    .AutoFilter Val(Left([B3], 1)) + 1, "*" & [c3] & "*": .Copy [A7]
End With
Sheet3.ShowAllData
[B][COLOR=#0000cd]Sheet1.Range("A8:A" & [A65000].End(xlUp).Row).Formula = "=ROW()-7"[/COLOR][/B]
End Sub

(ii) Nhập i và L bị liệt kê hết là do trong chuổi đó có chữ i và L (Đại Lý)

Túm lại dữ liệu chính xác của bạn như thế nào mới có thể điều chỉnh hợp lý.

 

[changngoc]

(i). Chỉnh lại code như sau:

Sub tim()
[A7:E100].Clear
With Sheet3.Range("A2:L60")
    .AutoFilter Val(Left([B3], 1))   1, "*"

 

[Hai Lúa Miền Tây]

Chọn cái cell tô màu đó bạn, mình đã làm 3 đk rồi.

 

[SA_DQ]

Bạn chưa cẩn trọng trong fát ngôn!

[thongbao]@ anh ChanhTQ: file của anh chưa đáp ứng các vấn đề: (i) Đừng phân biệt chữ hoa, chữ thường;[/thongbao]

Từ thời điểm bạn đưa bài chứa câu này trở về bài đầu topic của bạn, bạn chưa hề nói đến chuyện fân biệt chữ hoa/chữ thường đâu đó nha!

Thực ra chuyện đó không khó; nhưng khi đó bạn sẽ gặp 1 số fiền fức khác, chắc vậy!

Bye!