Buscar primera línea vacía.. sí, otra vez :(

15/08/2003 - 12:31 por Coruscar | Informe spam
Necesito vuestra ayuda. Quiero ejecutar automáticamente una misma
consulta SQL contra un grupo de ficheros MDB (microsoft access) y poner
los resultados en una misma hoja (nueva), a continuación unos de otros.
Los nombres de los ficheros ya los tengo (sin las extensiones) en una
columna de una hoja de datos.

El problema que tengo es que no consigo especificar en VBA la idea
"pegar los datos del recordset A PARTIR DE LA PRIMERA FILA VACIA".

Ahora mismo mi código, resumido a lo estrictamente necesario es mas o menos:

...
Set NuevaHoja = WorkSheets.Add
' recorro una columna que contiene los nombres de los ficheros access
do While NOT IsEmpty(ActiveCell)
'establezco una conexión ADO con el fichero ...
"Data Source =" & ActiveCell.Value & ".mdb" (...)

'Esto funciona pero machaca los datos cada vez que se
' ejecuta una nueva consulta:
NuevaHoja.Range("A1").CopyFromRecordset adoRS

'cierro la conexión...
loop
...

He intentado varias cosas cada vez más complicadas que como no
funcionan, no os contaré; estoy en un punto en que he calentado tanto a
la cebolla, que no soy capaz de que se me ocurran soluciones SENCILLAS,
que son las mejores, estoy convencido.

Gracias por leerme

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
15/08/2003 - 13:04 | Informe spam
Hola, Coruscar !

... problema ... no consigo ... en VBA ... pegar los datos ... A PARTIR DE LA PRIMERA FILA VACIA".
... Esto funciona pero machaca los datos cada vez que se ' ejecuta una nueva consulta:
NuevaHoja.Range("A1").CopyFromRecordset adoRS



==> Haz una prueba con...
NuevaHoja.Range("a65536").End(xlUp).Offset(1).CopyFromRecordset adoRS
_______
Saludos,
Héctor.
MS-MVP
Respuesta Responder a este mensaje
#2 Coruscar
15/08/2003 - 23:29 | Informe spam
Gracias; habría que proponer la creación del grupo
microsoft.public.es.Hector.ayuda :)


==> Haz una prueba con...
NuevaHoja.Range("a65536").End(xlUp).Offset(1).CopyFromRecordset adoRS




Por supuesto, funciona perfectamente.
Respuesta Responder a este mensaje
#3 Héctor Miguel
16/08/2003 - 09:31 | Informe spam
:-))))))))))

¡ Bastante es ya con que "me aguanten aqui... de metiche" !!!
(Gracias por el "feed-back", es bueno saber que sigue uno siendo util)

Saludos,
Héctor.
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida