Show 100% zoom report in center screen

[nigelb via AccessMonster.com]

I have the following code in my Access 2003 project that automatically zooms
the report to 100%. However, the report always shows on the left side of the
screen. How do I get the report to open at 100% full view and in the center
of the screen? (I´ve already set auto-center to Yes but makes no difference).

Private Sub cmdOpenReport_Click()
DoCmd.OpenReport "YourReport", acViewPreview
DoCmd.RunCommand acCmdZoom100
End Sub