Puedes apoyarte con esto:
Objeto PageSetup
Representa la descripción de la configuración de página. El objeto PageSetup contiene todos los atributos de configuración de página (margen izquierdo, margen inferior, tamaño de papel, etc.) en forma de propiedades.
Uso del objeto PageSetup
Use la propiedad PageSetup para devolver un objeto PageSetup. El ejemplo siguiente establece la orientación como horizontal y, a continuación, imprime la hoja de cálculo.
With Worksheets("sheet1")
.PageSetup.Orientation = xlLandscape
.PrintOut
End With
La instrucción With hace que resulte más sencillo y rápido establecer varias propiedades al mismo tiempo. El ejemplo siguiente establece todos los márgenes de la hoja de cálculo uno.
With Worksheets(1).PageSetup
.LeftMargin = Application.InchesToPoints(0.5)
.RightMargin = Application.InchesToPoints(0.75)
.TopMargin = Application.InchesToPoints(1.5)
.BottomMargin = Application.InchesToPoints(1)
.HeaderMargin = Application.InchesToPoints(0.5)
.FooterMargin = Application.InchesToPoints(0.5)
End With
