xin hỏi về việc chạy code trong textbox (1 người xem)

[kuvi1324]

Mình có 1 userform với khoảng gần 30 textbox, mình gặp 2 vấn đề:
1: đánh chữ trong textbox bị lag (chữ hiện ra chậm).
2: bấm tab đề chuyển qua textbox khác bị lag (có delay chứ ko nhảy qua liền) gây cảm giác khó chiu.

Khắc phục cái thứ 1 mình dùng code cho textbox:
Private Sub txtngaydexuat_Exit(ByVal Cancel As Forms.ReturnBoolean)
Worksheets("Nhaphoso").Cells(8, 1).Value = Me.txtngaydexuat.Value
End Sub

Khắc phục cái thứ 1 mình dùng code cho textbox:
Private Sub txtngaydexuat_change()
Worksheets("Nhaphoso").Cells(8, 1).Value = Me.txtngaydexuat.Value
End Sub

Có cách nào khắc phục cả 2 cách luôn không mọi người.

 

[giola]

Có cách nào khắc phục cả 2 cách luôn không mọi ngườ

Có bạn dùng method,

...._AfterUpdate

của textbox,
--------------

Nhưng hay hơn cả, là xóa tất đi, và chỉ nhập dữ liệu xuống sheet khi đã nhập xong tất cả text box --> chuyển cho người sử dụng bằng cách bấm nút Update (cập nhật) trên Form khi đó mới gán kết quả xuống cells của sheet

 

[kuvi1324]

Có bạn dùng method,

...._AfterUpdate

của textbox,
--------------

Nhưng hay hơn cả, là xóa tất đi, và chỉ nhập dữ liệu xuống sheet khi đã nhập xong tất cả text box --> chuyển cho người sử dụng bằng cách bấm nút Update (cập nhật) trên Form khi đó mới gán kết quả xuống cells của sheet

vậy dùng hàm như thế nào bạn

 

[giola]

vậy dùng hàm như thế nào bạn

hàm nào bạn, tôi có nói hàm nào đâu

Method
..._AfterUpdate
bạn có thể tìm thấy trong trang form code đó.

------------------------
còn cách 2 là tạo nút thì bạn tạo button trên userForm đó.