Code xử lý phím esc.

[chisinhvnn]

Mình đang dùng sự kiện click cho listbox để load lên các textbox để chỉnh sửa dữ liệu, đồng thời mình cho đóng băng cácCommand button khác, chỉ khi nào sửa xong cácCommand button mới hiện lại. Nhưng vấn đề khi mình chọn dữ liệu rồi, khg muốn sửa nữa, mình muuón dùng phím Esc để bỏ qua thì code xử lý như thế nào nhờ mọi người giúp đỡ

 

[vu_tuan_manh_linh]

Bạn thử một vài chức năng trong userform và kết hợp bắt phím sendkeys(). Không được thì giải pháp đơn giản là cho thêm 1 command button reset chức năng các command button về mặc định như ban đầu.

 

[batman1]

Mình đang dùng sự kiện click cho listbox để load lên các textbox để chỉnh sửa dữ liệu, đồng thời mình cho đóng băng cácCommand button khác, chỉ khi nào sửa xong cácCommand button mới hiện lại. Nhưng vấn đề khi mình chọn dữ liệu rồi, khg muốn sửa nữa, mình muuón dùng phím Esc để bỏ qua thì code xử lý như thế nào nhờ mọi người giúp đỡ

Chỉnh sửa có "mặt mũi" thế nào? Khi nào thì là sửa xong?
Sao không đính kèm đoạn code làm những việc "chỉnh sửa" và "sửa xong"?

Tốt nhất nên đính kèm tập tin, dữ liệu trên sheet có thể xóa
-----------
Không phải vô cớ mà tôi muốn nhìn tập tin. Vì nếu "sửa xong" là khi nhấn nút "Sửa" thì rõ ràng không thể đóng băng nút "sửa" được, lúc đó chỉ cần thêm code

Private Sub Sua_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 27 Then
        ' Làm tan băng
    End If
End Sub

Khi chọn trong ListBox thì ngoài việc load vào các TextBox thì set focus vào nút sửa.

Nếu không có nút sửa thì làm tương tự nhưng với vd. ListBox1_KeyDown

Phải biết cụ thể mặt mũi của Form thì mới đề nghị cụ thể được.