Pare de gastar tempo formatando o relatório para caber em uma tela.
Se o seu monitor for maior que o do seu chefe, já era...
Use a seguinte macro para sempre acertar:
Sub Z()
Range("A1:P40").Select 'Intervalo de células do seu relatório
ActiveWindow.Zoom = True
End Sub
Zoom na Seleção
Postado por Luís Fernando Marcadores: apresentação, Macro