Macro para imprimir una tabla que se actualiza periódicamente

Hola Amigos:

Quiero hacer una macro que me permita imprimir un rango de datos de una
tabla. Día a día se van actualizando los registros de dicha tabla, por lo
que, por ejemplo, al fin de un día nos encontramos con que el último
registro se encuentra en la fila 250, al día siguiente el último registro
esta en la fila 400, y al siguiente en la fila 140, y asi va variando día a
día.
Probe con una macro con el siguiente codigo:

Range("A1:G1000").Select
Selection.PrintOut Copies:=1, Collate:=True

Pero como era de esperarse me imprime tambien los registros en blanco con el
consiguiente desperdicio de papel. Como puedo hacer para que el programa me
reconozca cual es la última fila con resistros e imprima la tabla solo hasta
ahi?
Desde ya muchísimas gracias.
Contaduria