Enter como Tab

[MarianoH]

Saludos nuevamente:

Quisiera hacer que al presionar la tecla enter en una hoja protegida, se
simula la tecla tab (o sea pasar a la próxima celda desbloqueada). Pero en
las hojas y el libro no tengo un evento Keypress, ni encontré nada que
capture las entradas de teclado.
¿Sería posible realizar esto de alguna manera?

Desde ya muchas gracias por su ayuda.

--
Mariano A. Hernández

[Héctor Miguel]

hola, Mariano !

> ... que al presionar la tecla enter en una hoja protegida ... pasar a la proxima celda desbloqueada
> ... en las hojas y el libro no tengo un evento Keypress, ni encontre nada que capture las entradas de teclado [...]

puedes usar el metodo/evento de la aplicacion ->OnKey Tecla/s, [Procedimiento]<-
[p.e. al activar/desactivar la hoja protegida]
=== en el modulo de codigo de 'la hoja' ===
Private Sub Worksheet_Activate()
Application.OnKey "~", "Tabular"
Application.OnKey "{Enter}", "Tabular"
Application.OnKey "+~", "ReTabular"
Application.OnKey "+{Enter}", "ReTabular"
End Sub
Private Sub Worksheet_Deactivate()
Application.OnKey "~"
Application.OnKey "{Enter}"
Application.OnKey "+~"
Application.OnKey "+{Enter}"
End Sub
=== en un modulo de codigo 'normal' ===
Private Sub Tabular()
SendKeys "{Tab}"
End Sub
Private Sub ReTabular()
SendKeys "+{Tab}"
End Sub
¨¨¨¨¨¨¨¨¨¨¨¨
la tecla '~' es el 'enter' del teclado alfa-numerico
la tecla '{Enter}' es la del teclado numerico
el signo '+' [equivale a] 'es' la tecla 'mayusculas' [por si tambien quieres 'regresar' a la anterior] ;)
si se omite 'procedimiento' [evento '_deactivate']... se 'restablecen' las teclas a su comportamiento 'normal'

saludos,
hector.

[MarianoH]

Hector: Funciona a la perfección, mil gracias por esta y por tantas otras.

Saludos

--
Mariano A. Hernández
"Héctor Miguel" <NOhemio...@PLShotmail.com> escribió en el mensaje
news:ev8#Tr1hEH...@TK2MSFTNGP12.phx.gbl...