Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Cambiar a una determinada celda al pulsar ENTER

12/02/2006 - 00:11 por bobafett | Informe spam
Ayuda Hacer una pregunta
Hola, necesito que al pulsar ENTER en una determinada celda me seleccione
otra, he probado con esto, pero no me funciona.

Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Address = "$A$1" Then Application.OnKey "{ENTER}", "Salto"

"Salto" es la macro que ejecuta el cambio, esta me funciona bien.
Os doy las gracias de antemano, por vuestras respuestas.
Supongo que sera alguna chorrada, pero estoy aprendiendo.
email Siga el debateRespuesta 3 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 KL
12/02/2006 - 00:23 | Informe spam
Hola Alf,

Y por que no asi:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1")) Is Nothing Then Salto
End Sub

Saludos,
KL


"Alf" wrote in message news:
Hola, necesito que al pulsar ENTER en una determinada celda me seleccione
otra, he probado con esto, pero no me funciona.

Private Sub Worksheet_Change(ByVal Target As Range)
If ActiveCell.Address = "$A$1" Then Application.OnKey "{ENTER}", "Salto"

"Salto" es la macro que ejecuta el cambio, esta me funciona bien.
Os doy las gracias de antemano, por vuestras respuestas.
Supongo que sera alguna chorrada, pero estoy aprendiendo.

Preguntas similares

 

Busqueda sugerida :