Obtener numero de registros en una QueryTable

30/10/2006 - 17:34 por kusflo | Informe spam
Utilizo Querytable para obtener registros de una base de datos en Access
pero tengo el siguiente problema. ¿Como puedo obtener el número de registros
de la consulta antes de haberla volcado en la excel?. Espero que puedan
ayudarme. Gracias!

A continuación muestro el codigo que utilizo para volcar los resultados de
la consulta.
Conexion = variable con la cadena de conexion
sqlcadena= variable con el código de la consulta
"A1" = celda donde volcara los resultados de la consulta

With ActiveSheet.QueryTables.Add(Connection:=conexion,
Destination:=Range("A1"), Sql:=sqlcadena)
.BackgroundQuery = False
.Refresh
End With

"Saber que se sabe lo que se sabe y que no se sabe lo que no se sabe; he
aquí el verdadero saber." Confucio.
 

Leer las respuestas

#1 Héctor Miguel
30/10/2006 - 21:00 | Informe spam
hola, marcos !

Utilizo Querytable para obtener registros de una base de datos en Access pero
... Como puedo obtener el numero de registros de la consulta antes de haberla volcado en la excel?...
... el codigo que utilizo para volcar los resultados de la consulta.
Conexion = variable con la cadena de conexion
sqlcadena= variable con el codigo de la consulta
"A1" = celda donde volcara los resultados de la consulta
With ActiveSheet.QueryTables.Add(Connection:=conexion,
Destination:=Range("A1"), Sql:=sqlcadena)
.BackgroundQuery = False
.Refresh
End With



1) mientras continues creando consultas 'nuevas y en directo'... -> With ActiveSheet.QueryTables.Add(...
[supongo que] no tendras oportunidad de 'contar' los registros que pudiera devolver la consulta -?-

2) si necesitas conocer el numero de registros de una consulta 'previo' al volcado de sus datos...
necesitas asignar el resultado de abrir y consultar una BD -> a una variable de tipo 'RecordSet'
y contar el numero de registros con las propiedades:
<variableRecordSet>.RecordCount [el numero de registros devueltos por la consulta]
<variableRecordSet>.Fields.Count [el numero de campos/columnas de la consulta] ;)

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Preguntas similares