hoangnguyen131187h
Thành viên chính thức


- Tham gia
- 27/8/11
- Bài viết
- 79
- Được thích
- 3
Private Sub TextBox1_Change()
ActiveSheet.ListObjects("SP").Range.AutoFilter Field:=1, _
Criteria1:="*" & [B1] & "*", Operator:=xlFilterValues
End Sub
Cảm ơn bạn rất nhiều. quả thực mình không để ý. Chúc năm mới nhiều sức khoẻMã:Private Sub TextBox1_Change() ActiveSheet.ListObjects("SP").Range.AutoFilter Field:=1, _ Criteria1:="*" & [B1] & "*", Operator:=xlFilterValues End Sub
Copy chuẩn vào, chính xác tới từng cái dấu ", copy cũng phải có nghệ thuật đấy
Đọc xem nó bảo gì thì sửa nấy....báo lỗi
Bạn đã bật intecal chưa? Đây là tham chiếu vòng mà.À nhưng khi mình đánh tiếng việt có dấu thì nó đang báo lỗi bạn có thể xem thêm giúp không:
View attachment 191695
intecal là gì vậy ban? mình cũng không biết sao nó báo lỗi đó nữa. chỉ làm theo hướng dẫn trên mạng thôi mà nhỉ?Bạn đã bật intecal chưa? Đây là tham chiếu vòng mà.