Mærkligt felmeddelande

Kan du vise os linjen, hvor fejlen sker?

Hej jesperfjoelner! Jag har varit upptagen med annat och inte kunnat svara dig førræn nu.
Koden till formulæret ær enligt føljande:
    If IsDate(Me.Startdatum) And IsDate(Me.SLUTDATUM) Then
            If Me.SLUTDATUM < Me.Startdatum Then
                msg "Slutdatum måste vara senare än startdatum.", vbInformation, "Datumfel!"
                AngeDatum.Caption = "Ange slutdatum"
                MarkeraDatum.SetFocus
            Exit Sub
            End If

        If Forms.Urval.Rapp = 2 Then
            If DLookup("Debiteras", "ResapMakulSpec") > 0 Then
                    DoCmd.OpenReport "ResapMakulPrint", acNormal
                If DLookup("Fakturering", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort", acNormal
                End If
                If DLookup("Bokslut", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort2", acNormal
                End If
            Else
                If DLookup("Fakturering", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort", acNormal
                End If
                If DLookup("Bokslut", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort2", acNormal
                End If
            End If
        End If
   
        If Forms.Urval.Rapp = 3 Then
            If DLookup("Debiteras", "ResapMakulSpec") > 0 Then
                    DoCmd.OpenReport "ResapMakulPrint", acViewPreview
                If DLookup("Fakturering", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort", acViewPreview
                End If
                If DLookup("Bokslut", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort2", acViewPreview
                End If
            Else
                If DLookup("Fakturering", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort", acViewPreview
                End If
                If DLookup("Bokslut", "Ftg") = True Then
                    DoCmd.OpenReport "Manadsrappinkort2", acViewPreview
                End If
            End If
        End If
        DoCmd.Close acForm, "Urval"<<<<<<<<<<<
    Else
        msg "Ange ett giltigt datum för startdatum och slutdatum.", vbInformation, "Ogiltigt datum!"
    End If
Jag har nu ændrat <<<<<<<<<< från att tidigare varit Me.Visible = False
vilket fungerar. Tidigare stængdes formulæret via rapporten som vid stængning kørde koden Docmd.Close acform, "Urval" vilket gav felmeddelandet att objektet inte støder egenskapen eller metoden.

Closing question.