Forums Neueste Beiträge
 

Meldung: Ungültigen Verweis auf die Form/Report-Eigenschaft ...

15/11/2009 - 13:20 von Marion Hildebrandt | Report spam
Guten Tag,

Ich kàmpfe hier mit einem Problem, bei dem ich den Fehler im Moment nicht
selbst finden kann.
Ich habe ein Hauptformular „frmRechnungsausgang“ mit 2 UFO’s
„frmRechnungsausgang1“ und „frmRechnungsausgang2“. UFO „frmRechnungsausgang1“
enthàlt eine Liste der Datensàtze und UFO „frmRechnungsausgang2“ die
Detaildatensàtze.
Beim Öffnen des Hauptformulars wird folgende Meldung angezeigt: „Sie haben
einen Ausdruck eingegeben, der einen ungültigen Verweis auf die
Form/Report-Eigenschaft enthàlt.“
Ursache für diese Meldung ist folgender VBA Code im UFO1, der die Anzeige
der Detaildatensàtze steuert:

Private Function SearchRecord()

Dim rs As DAO.Recordset
Set rs =
Forms!frmRechnungsausgang!frmRechnungsausgang2.Form.RecordsetClone
rs.FindFirst "IDRechnungsAusgang=" & Me.IDRechnungsAusgang
If Not rs.NoMatch Then
Forms!frmRechnungsausgang!frmRechnungsausgang2.Form.Bookmark =
rs.Bookmark
End If
Set rs = Nothing

End Function

Die Meldung wird bereits in folgender Zeile ausgelöst:
Set rs =
Forms!frmRechnungsausgang!frmRechnungsausgang2.Form.RecordsetClone

Was kann da denn jetzt falsch sein? Die Funktion „SearchRecord“ habe ich
übrigens im Eigenschaftenblatt der Listenfeldern im UFO „Rechnungsausgang1“
direkt eingetragen (Ereignis: Hingehen) Ich vermute nun, dass UFO
„frmRechnungsausgang2“ beim Start der Funktion aus dem Eigenschaftenblatt
noch nicht geladen ist, da abgesehen von der Meldung im Anschluss alles
bestens funktioniert . Aber die Meldung stört halt. Wer kann bitte helfen?

Ich verwende: Office 2007, Vista

Viele Grüße aus Hamburg
Marion
 

Lesen sie die antworten

#1 Thomas Möller
15/11/2009 - 13:44 | Warnen spam
Hallo Marion,

Marion Hildebrandt schrieb:
Die Meldung wird bereits in folgender Zeile ausgelöst:
Set rs =
Forms!frmRechnungsausgang!frmRechnungsausgang2.Form.RecordsetClone



probier mal ob es hilft, wenn Du ein zusàtzliches ".Form" einfügst:

Set rs =
Forms!frmRechnungsausgang.Form!frmRechnungsausgang2.Form.RecordsetClone


CU
Thomas

Homepage: www.Team-Moeller.de

Ähnliche fragen