Skriver ut en rapport och vill ändra skriverens inställning till liggande format automatiskt, Men får det inte att funka.

Skriver så här men ingen ändring på skrivaren?

Private Sub DataReport_Initialize()

With Printer
.Orientation = vbPRORLandscape '(2) Liggande, Stående=vbPRORPortrait '(1)
End With

End Sub


Tacksam för hjälp

Är det inte bättre att arbeta mot rapprten än skrivaren?
<code>
Me.Orientation = rptOrientLandscape
</code>

Personligen skulle jag inte placera koden i Initialize eventet. Utan sätta det i designläge om det är standardvärde.

Eller programmatiskt:
<code>
DataReport1.Orientation = rptOrientLandscape
DataReport1.Show
</code>

Den var bra!

Men varför ser jag inte den inställningen i Properties fönstret?

Tack!

Kan vara så att jag gjort bort mig och egenskaperna inte är tillgängliga i design-läge.