Teclas abreviadas
Alguien puede decirme como crear un modulo que guarde la configuración de teclas abreviadas, es decir que, cuando desde cualquier parte del programa pulse Ctrl+N abra un nuevo registro, Ctrl+S vaya al registro siguiente, Ctrl+A vaya al registro anterior, etc.
1 respuesta
Respuesta de Julián González Cabarcos
1
En la ventana de código del formulario pega esto
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyctrl + vbKeyS
DoCmd.GoToRecord , , acNext
Case vbKeyctrl+vbkeyN
docmd.gotorecord,,acnewrec
Case vbKeyctrl+vbkeyA
etc
End Select
End Sub
Private Sub Form_Load()
Me.KeyPreview = True
End Sub
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyctrl + vbKeyS
DoCmd.GoToRecord , , acNext
Case vbKeyctrl+vbkeyN
docmd.gotorecord,,acnewrec
Case vbKeyctrl+vbkeyA
etc
End Select
End Sub
