Opretholde "Hovedoversigt" ved brevfletning

Hej !
Jeg bruger nedenstående til at flette over fra en forspørgsel i Access til Word - dette fungerer egentlig som det skal.
Mit problem er, at databasevinduet kommer til syne når jeg afvikler koden.
Når Word lukkes, vender man heller ikke automatisk tilbage hvor man kom fra.
Er der nogen som har en god idé til at "opretholde" formularen og skifte direkte over til Word og når denne lukkes for så herefter at vende tilbage igen til Access.

\OMP   

Public Function WordMerge()
    'Henter MS Word Brevfletningsguide
    Dim fReturn As Boolean

On Error GoTo HandleErr
    DoCmd.SelectObject acQuery, "Brevfletning", True
    DoCmd.RunCommand acCmdWordMailMerge

ExitHere:
    Exit Function
   
HandleErr:
    Select Case Err
            Case 2544
            ' genskaber Brevfletning
            fReturn = RecreateBrevfletning()
            If fReturn Then Resume
        Case Else
            MsgBox Err & ": " & Err.Description, vbOKOnly, "Fejl I brevfletning"
    End Select
    Resume ExitHere
    Resume
End Function