Print Macro - Landscape Orientation Graph

Hi. I need to print on a landscape piece of A4 a graph (which also needs to fill the entire page). I already have the basic function down.

Sub PrintChart()
    Sheet4.PageSetup.Orientation = xlLandscape.ChartObjects("Chart 6").Chart.PrintOut
End Sub

For some reason, I get 'Invalid Qualifier'. What is the solution to this?