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
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
"Thomas Möller" schrieb:
> .
>
Sieht nach einem reinen Zeitproblem aus.
Wenn nur die Meldung stört, dann fange einfach den Fehler stumm ab.
Ansonsten verwende andere Ereignisse. z.B. Nach Aktualisierung
des Listenfeldes im UFo1 und "Beim Öffnen" oder "Beim Anzeigen"
von UFo2 vor dem o.a. Code noch eine Prüfung, ob ein Synch
notwendig ist. So ähnlich habe ich unlängst ein Timing-Problem
mit sich gegenseitig synchronisierenden UFos gelöst.
--
Servus
Karl
********* Ich beantworte keine Access-Fragen per Email. *********
Access-FAQ: http://www.donkarl.com + Anmeldung und Info zur
Access-Entwickler-Konferenz (AEK12), Oktober 2009, Nürnberg
Viele Grüße aus Hamburg
Marion
"Karl Donaubauer" schrieb:
> .
>
"Marion Hildebrandt" schrieb: