Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) If KeyCode = 45 Then MsgBox "Has pulsado la tecla Inser" End If End Sub