help!!! bị lỗi ẩn hàng

[Châu Toàn]

sau khi mình thực hiện tìm kiếm xong 1 kết quả thì bị trường hợp 1 số hàng bị ẩn đi, lần nào cũng phải double click. các pro có cách nào giải quyết vấn đề của mình ko? SHEET NHAP - XUAT

 

[HeSanbi]

Khi tìm kiếm bạn sẽ thấy có cái Phiễu ở trên cột tìm kiếm chính là Field:=2 , cột B
Để xóa nó đi, mọi thứ trả về ban đầu : ActiveSheet.ListObjects("nhap").Range.AutoFilter Field:=2
Thử xem sao:
Sữa trong Private Sub TextBox1_Change
và Thêm một nút macro để xóa nhanh ô nhập

Private Sub TextBox1_Change()
    If TextBox1 = vbNullString Then
      'Bỏ Field
       ActiveSheet.ListObjects("nhap").Range.AutoFilter Field:=2
    Else
        ActiveSheet.ListObjects("nhap").Range.AutoFilter Field:=2, _
        Criteria1:="*" & [b2] & "*", Operator:=xlFilterValues
    End If
End Sub
' Thêm một Macro để xóa Ô nhập'
Sub ClearTextBox1()
    ActiveSheet.TextBox1.Value = ""
End Sub

 

[Châu Toàn]

thanks bạn, vẫn ko được! kết quả là tắt filter đi thì mọi thứ lại hiện ra. còn cách khác ko nhỉ?

 

[HeSanbi]

Cảm ơn bạn, vẫn ko được! kết quả là tắt filter đi thì mọi thứ lại hiện ra. còn cách khác ko nhỉ?

Nếu bạn hiểu boolean là gì thì tốt, hỏi sao thì trả lại vậy. giờ nó hiện ra rồi lại kêu ẩn đi.
Câu hỏi của bạn phải cần hiện dữ liệu đến đâu, trong vùng nào. Bạn hỏi mà nó đi ngược với toán học quá.

 

[Châu Toàn]

sr, bữa giờ ko online được. vẫn ko hiểu gì nhiều, chỉ toàn học mò theo người ta thôi bạn à.. mình đang tìm cách giải quyết nhanh bài toàn tìm kiếm tên 1000 người công nhân và nhập số tiền lương, ngày công vào. nhưng gặp 1 số lỗi như bị ẩn hàng như file trên mình gởi