åbne som dataark

Fra en anden formular åbner jeg formularen "frmNøgletalSystem". Denne er sat til at vises som dataark, og sådan åbnes den også, når jeg åbner den direkte. Men når jeg åbner den fra formularen via knappen, så åbner den sig som enkeltformular. Hvordan ændrer jeg det?

Her er koden til min knap, som åbner formularen:

Private Sub cmdNyeNøgletal_Click()
On Error GoTo Err_cmdNyeNøgletal_Click

    Dim stDocName As String
    Dim stLinkCriteria As String

    stDocName = "frmNøgletalSystem"
    DoCmd.OpenForm stDocName
    Form_frmDataindUnderfrm.Nøgletal.Requery
    Form_frmDataindUnderfrm.Requery

Exit_cmdNyeNøgletal_Click:
    Exit Sub

Err_cmdNyeNøgletal_Click:
    MsgBox Err.Description
    Resume Exit_cmdNyeNøgletal_Click
   
End Sub