PageSetup.Orientation procedure builder

PageSetup.Orientation (Excel)

Returns or sets an XlPageOrientation value that represents the portrait or landscape printing mode.

xlLandscape - Landscape mode, xlPortrait - Portrait mode.
ActiveChart.PageSetup.Orientation = xlLandscape