Formular öffnen mit doCmd.OpenForm

[tismo]

Hallo ,

komme gerade nicht weiter. IOch möchte ein bestimmtes Formular öffen, wenn bestimmter  ein Wert aus einem Listenfeld gewählt wird

Code [Auswählen] Erweitern

Private Sub EinäscherungsOrtDialog_Click()

If Me.EinäscherungsOrt = "Ort1" Then
DoCmd.OpenForm "AmtOrt1", , , "[Rechnungsnummer] =" & Me!Rechnungsnummer

End If

End Sub

kommt leider eine Fehlermeldung 

Kann jemand helfen ?

Gruß, Lars

[tismo]

mein Fehler
Fomular war nicht richtig geschrieben.

aber, wie öffne ich das Formular im Dialog ?

[MzKlMu]

Hallo,
Cursor auf OpenForm stellen und F1 drücken, könnte helfen.

Code [Auswählen] Erweitern

DoCmd.OpenForm "AmtOrt1", , , "[Rechnungsnummer] =" & Me!Rechnungsnummer, , acDialog