Vc ja pensou em indicar as coordenadas da impressao:
Faz o seguinte:
Printer.ScaleMode = vbMillimeters 'força usar milimetros na medida
Printer.X = 100 'posicao onde quer imprimir
Printer.Y = 100 'posicao onde quer imprimir
Pra cada linha q vc for imprimir, vai ter q indicar um novo X e Y... assim vc imprime onde quer...