Åbn forespørgsel i pivotdiagramvisning

følgende åbner forespørgsel i dataarkvisning.

Private Sub Kurver_Click()
On Error GoTo Err_Kurver_Click

    Dim stDocName As String

    stDocName = "FVC2 Forespørgsel"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Kurver_Click:
    Exit Sub

Err_Kurver_Click:
    MsgBox Err.Description
    Resume Exit_Kurver_Click
   
End Sub

Men jeg vil gerne have den til at starte i Pivotdiagramvisning.
Hvordan gør man det?