Opret ny record, hvis den ikke findes

På min formular vil jeg oprette en post hvis jeg finder ud af at den ikke findes i forvejen.
Jeg har prøvet sådan:

Private Sub Meddelelse_BeforeUpdate(Cancel As Integer)
Dim FdateExists As Boolean
Dim medd As String
FdateExists = (DCount(\"*\", \"Apparat\", \"[Meddelelse] = \'\" & Me!Meddelelse & \"\'\") > 0)
If FdateExists Then
    medd = MsgBox(\"Meddelelse findes i forvejen!\")
    If medd = vbInformation Then
        Exit Sub
    End If
Else
    Call tilføj
End If
End Sub

Private Sub Tilføj_ny_Click()
    Call Tilføj
End Sub

Function Tilføj()
    DoCmd.GoToRecord , , acNewRec
end function

- så skal man kunne oprette nye records -både ved hjælp af en Tilføj-knap og \"automatisk\", hvis man finder ud af den ikke findes i forvejen.

Der kommer imidlertid en fejlmedd. som siger:
\"Du kan ikke gå til den angivne post\"

Hvordan kommer jeg uden om den?