How to close a form in sub Form_Open()

[xenofoob]

Hello,

My Title is clear enough I hope ^o^

This is my piece of code:

Private Sub Form_Open(Cancel As Integer)
    If IsNull([factuur_datum]) Then
      'null
    Else
        Dim value As Integer
        value = MsgBox("Date = Null", vbOKCancel)
        If value = 2 Then
            DoCmd.Close
        End If
    End If
End Sub

Explaination:
This piece of code checks if the date field is empty or not. If not the user gets a confirmbox. When clicking the cancel button the form has to close.

Via this code I get an error message: "Microsoft Office Access can't find the form 'FactuurInvoeren' referred to in a macro expression or Visual Basic code."

How to close the form without any warnings or messages?

Thanks a lot!

 

[Craig0201]

Try asking in the Access forum

http://www.tek-tips.com/threadminder.cfm?pid=181

 

[xenofoob]

k, done, tnx