Mình đâu thấy lỗi gì đâu bạn. Lỗi chăng là do dữ liệu nguồn của bạn cột đơn giá có những cell #DIV/0! nên nó gây nên lỗi. Bạn thay thế #DIV/0! = 0 hay bấc kỳ số khác là được.Mình có sửa chương trình này nhưng sao nhập vào TextBox nhưng không fillter được. Các bạn chỉ giáo cho
Sao mình không đính kèm file được vậy các bạn
Private Sub TextBox1_Change()
[COLOR=red]On Error Resume Next[/COLOR]
.......
End Sub
Cám ơn bạn nhiều, vậy à mình không biết.Mình đâu thấy lỗi gì đâu bạn. Lỗi chăng là do dữ liệu nguồn của bạn cột đơn giá có những cell #DIV/0! nên nó gây nên lỗi. Bạn thay thế #DIV/0! = 0 hay bấc kỳ số khác là được.
Hoặc vào code thêm dòng sau vào thủ tục change của textbox1 là được.
P/S: File này được tạo ra bởi thầy Tuấn thì phải.Mã:Private Sub TextBox1_Change() [COLOR=red]On Error Resume Next[/COLOR] ....... End Sub