RE:desactivar la tecla esc
Hola Adriana:
Necesitas poner estos tres Eventos en el Formulario:
Private Sub Form_Load()
KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyEscape
Call AnulaTecla(KeyCode, vbKeyEscape)
MsgBox "La Tecla ESC está anulada.", vbCritical, "Tecla desactivada"
End Select
End Sub
Function AnulaTecla(KeyCode As Integer, ParamArray Keys() As Variant) As Integer
Dim Tecla As Variant
For Each Tecla In Keys
If KeyCode = Tecla Then
KeyCode = 0
Exit Function
End If
Next
End Function
La Función AnulaTecla la podrías poner en un Módulo y funciona igual y la línea del MsgBox es opcional, si quieres lo puedes quitar.
Saludos
Enrique