SetFocus to report in VBA

[Verwijderd]

Hopelijk voor meerdere hier een redelijk makkelijk te beantwoorden vraag.

Ik wil dat wanneer je een report previewed dit op de voorgrond komt en niet op de achtergrond. Bij forms heb je pop-up's, dat kan hier niet vinden, dus dacht ik het via een SetFocus op te lossen maar ik kom er niet achter hoe.

Alvast Bedankt

[faabman]

Moves the focus to the specified window.

Syntax

object.SetFocus

The object placeholder is an object expression that evaluates to an object in the Applies To list.

Remarks

Use the SetFocus method on windows that are already visible.

op msdn

[Verwijderd]

SetFocus helpt niet, het report wordt geladen op de achtergrond. De reden daarvoor is is dat de commandbutton op een dialog form met pop-up yes is geplaatst.

Ik heb deze code al gevonden:


DoCmd.OpenReport "SubGroep Query", acPreview
Me.Visible = False
DoEvents
While SysCmd(acSysCmdGetObjectState, acReport, "SubGroep Query") = acObjState_Open
DoEvents
Wend
Me.Visible = True
DoEvents

Alleen deze doet het niet, ik gebruik deze code als event On Click.
Iemand?