¿Como hacer OnKeys para teclado numérico?

Tengo una hoja Excel lista para trabajar, pero necesito usar solo el teclado numérico.

1.- Estos OnKey me funcionan solo con el teclado Alfanumérico, pero solo me funciona uno o el otro, nunca los 2 a la vez.

Private Sub Workbook_Open()

Application.OnKey "{+}", "EntradaMas"

End Sub

Private Sub Workbook_Open()

Application.OnKey "{-}", "EntradaMenos"

End Sub

Necesito que funcionen los 2, y con el teclado numérico. No sé si OnKey distingue las teclas “{+}” y “{-}” de cada teclado, o si se pueden hacer OnKeys con los códigos de las teclas.

2.- Para bloquear una letra utilizo este OnKey y me funciona.

Sub DesactivarTeclaA()

Application.OnKey "{A}", ""

End Sub

Pero necesito OnKey para deshabilitar estas 3 teclas “{*}”, “{/}” y “{.}” del teclado numérico

Añade tu respuesta

Haz clic para o