Carlos Acho que posso ajudar você.
Se caso você começar assim, o seu relatório:
Printer.ScaleMode=4
Printer.print tab(0); "Cabeçalho"
Blá
Blá
Blá
Blá
Se caso você começar assim, no final você pode usar o seguinte:
printer.newpage
printer.enddoc
pois assim você inicia uma nova página e termina a impressão, tendo como resultado a posição inicial na cabeça de impressão.
Se caso você abrir com:
Open "Lpt1" For Output As #1
print #1, tab(0); "Cabeçalho"
Blá
Blá
Blá
Se caso você começar assim você pode fazer o seguinte:
Criar um pequeno contador, para chegar no total da página, algo assim:
Se você imprimiu um relatório e ele ocupou 15 linhas, ficam faltante 45 para chegar ao final da página, então ficaria algo parecido com isso:
Linha=15
while not linha = 60
print #1,
linha=linha+1
wend
close #1
Assim qdo chegar ao final da página você irá posicionar o cabeçote aonde você quer.
Se caso tiver dúvida, eu tenho um relatório com cada comando, eu posso estar te mandando um exemplo de cada um.
Álvaro
