Bạn dùng Code sauChào cả nhà GPE.
Em đang tự học VB trên Excel nhưng khi thực hành có lỗi như File em làm.
Nhờ cả nhà giúp em tìm ra lỗi với.
Private Sub TextBox1_Change()
ActiveSheet.ListObjects("Table2").Range.AutoFilter Field:=1, Criteria1:="*" & [B2] & "*"
End Sub