Tecla de Función para botones access

Me puede guiar a como utilizar las teclas de funciones (F1-F2-F3-... F12), para llamar a una macro, o en ves de hacer clic en el botón o traer un formulario

1 Respuesta

Respuesta
1

La forma fácil es que crees una macro de nombre Autokeys y en ella programes lo que quieres que haga cada tecla, por ejemplo:

Otra opción sería que programases, en cada formulario, el evento "Al pulsar una tecla":

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Dim miValor As Variant
Select Case KeyCode
Case vbKeyF11
'Acción para F11
Case vbKeyF12
'Acción para F12
End Select
Call AnulaTecla(KeyCode, vbKeyF11, vbKeyF12)
End Sub
Private Sub AnulaTecla(KeyCode As Integer, ParamArray Keys() As Variant)
Dim Tecla As Variant
For Each Tecla In Keys
If KeyCode = Tecla Then
KeyCode = 0
Exit Sub
End If
Next
End Sub

El procedimiento "AnulaTecla" es para anular la función predeterminada de las teclas.


Añade tu respuesta

Haz clic para o

Más respuestas relacionadas