Excel - Pequeña macro

 
Vista:

Pequeña macro

Publicado por Luis Galeno (1 intervención) el 31/03/2006 10:48:36
Necesito resolver una simpleza pero que no encontré en ningún curso, ni aún en esos que comienzan de "cero". Es lo siguiente:

Necesito la codificación que:
1 Al comenzar la ejecución de la macro, se posicione, por ejemplo, en la celda a9 y ahí se detenga a esperar que ingrese un dato
2 Ingresado el dato y digitado "enter" se posicione en la celda b9 y espere que ingrese un dato (es decir "que camine" por la fila 9)
3 Ingresado el dato y digitado "enter" se posicione en la celda c9 y espere que ingrese un dato
4 Ingresado el dato y digitado "enter" se posicione en la celda d9 y termine la ejecución.

Por favor, quien lo sepa me lo escribe. Gracias.
Luis.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Pequeña macro

Publicado por JuanC (792 intervenciones) el 31/03/2006 15:12:39
Algo como para empezar...

Sub Iniciar()
Application.OnKey "{ENTER}", "d"
Application.OnKey "~", "d"
[A9].Select
End Sub

Private Sub d()
If ActiveCell.Column = 3 Then
[D9].Select
Application.OnKey "{ENTER}"
Application.OnKey "~"
Else
ActiveCell.Offset(0, 1).Select
End If
End Sub

Las mejoras te las dejo de regalo!

Saludos y buena suerte, desde Buenos Aires, JuanC
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar