Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

Orden secuencial de captura de datos

03/12/2009 - 00:33 por JForero | Informe spam
Ayuda Hacer una pregunta
buenas tardes grupo



en la hoja Formulario tengo una especie de formulario de captura de datos
con una serie de celdas que el usuario debe diligenciar, las demas estan
protegidas (donde se encuentran los títulos de cada campo) . con el botón
enviar me graba los datos en la hoja clientes insertando una fila al final
con los datos digitados.



Hay alguna forma para que cuando el usuario este diligenciando el formulario
y oprima la tecla enter en la celda XX en cada dato ingresado me quede la
siguiente celda que yo deseo que el usuario digite ejemplo.



Al abrir el archivo y/o despues de dar click en el boton enviar se debe
ubicar en la celda c4

Al diligenciar esta celda y oprimir enter debe pasar a la celda c5,
diligencia y oprime enter debe pasar a la celda c6, luego a la e6, luego c7,
luego e7 luego g7. etc..



Gracias por la colaboracion

Saludos

Jorgef.
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 AnSanVal
03/12/2009 - 03:14 | Informe spam
Hola Jorge.

Una opción:
Ajusta "Mover selección despues de entrar": DERECHA.
Proteje la hoja con la opción "Seleccionar celdas bloqueadas" DESMARCADA.

Otra opción el siguiente código...

En el módulo ThisWorkbook:
Private Sub Workbook_Open()
ActiveSheet.ScrollArea = "$C$6"
End Sub

En el módulo de la hoja:
Private Sub Worksheet_Change(ByVal Target As Range)
Exit Sub
Select Case Target.Address
Case "$C$5"
ActiveSheet.ScrollArea = "$C$6"
Case "$C$6"
ActiveSheet.ScrollArea = "$E$6"
Case "$E$6"
ActiveSheet.ScrollArea = "$C$7"
Case "$C$7"
ActiveSheet.ScrollArea = "$E$7"
Case "$E$7"
ActiveSheet.ScrollArea = "$G$7"
Case "$G$7"
ActiveSheet.ScrollArea = "$C$5"
End Select
End Sub

Saludos: Antonio.
************************************
"JForero" escribió en el mensaje news:%238c%


buenas tardes grupo



en la hoja Formulario tengo una especie de formulario de captura de datos con una serie de celdas que el usuario debe
diligenciar, las demas estan protegidas (donde se encuentran los títulos de cada campo) . con el botón enviar me graba
los datos en la hoja clientes insertando una fila al final con los datos digitados.



Hay alguna forma para que cuando el usuario este diligenciando el formulario y oprima la tecla enter en la celda XX en
cada dato ingresado me quede la siguiente celda que yo deseo que el usuario digite ejemplo.



Al abrir el archivo y/o despues de dar click en el boton enviar se debe ubicar en la celda c4

Al diligenciar esta celda y oprimir enter debe pasar a la celda c5, diligencia y oprime enter debe pasar a la celda
c6, luego a la e6, luego c7, luego e7 luego g7. etc..



Gracias por la colaboracion

Saludos

Jorgef.


Preguntas similares

 

Busqueda sugerida :