Llenado de base de datos en excel

06/12/2004 - 19:40 por Adrian | Informe spam
Quisiera saber si alguien me puede ayudar con lo siguiente

Tengo una base de datos en excel (2000 registros aprox.) los cuales son
llenados directamente en la hoja de calculo (algo laborioso debido a que
tengo que llenar en forma horizontal 140 columnas).

Para la impresion individual de estos datos, generé una forma para indicar
cada dato del registro en forma ordenada (algo asi como una solicitud de
inscripcion tradicional para alguna entidad), esto es, si quiero los datos
del registro 1, escribo este numero en alguna celda especifica y en
automatico se llena el resto de la forma con la funcion: BDEXTRAER.

Hasta aqui no tengo problemas. La solicitud es lo siguiente, alguien podría
indicarme alguna macro para hacerlo en forma inversa, esto es, llenar la
forma de impresion y con alguna macro, se llene la base de datos integrando
los datos nuevos al final de la base de datos?

Gracias esperando haberme explicado.
Adrian
 

Leer las respuestas

#1 Héctor Miguel
07/12/2004 - 09:14 | Informe spam
hola, Adrian !

... alguna macro para ... llenar ... la base de datos integrando los datos nuevos al final de la base de datos?



espero haber 'captado' la intencion :))
suponiendo que los datos 'se llenan' en la hoja2 [p.e.] 4 columnas SIN los titulos en 'A2:D[n]'
y que en la base de datos de 'adicionan' SIEMPRE en la 'siguiente fila libre' de la columna 'A'
en un modulo de codigo 'normal' ==Sub RegistrarDatosNuevos()
With Worksheets("Hoja2")
Range(.Range("a2"), .Range("a65536").End(xlUp)).Resize(, 4).Copy _
Worksheets("Hoja1").Range("a65536").End(xlUp).Offset(1)
End With
End Sub

saludos,
hector.

Preguntas similares