Office: Liste in neuem Formular füllen

Hallo zusammen,
ich würde gerne bei einem Doppelklick auf Liste206 in Formular 1, dass Liste4 in Formular 2 nach einer bestimmten SQL Abfrage gefüllt wird.
Dazu habe ich bereits folgenden Code:

Code:

Private Sub Liste206_DblClick(Cancel As Integer)
Dim db As DAO.Database
Set db = CurrentDb
varStatement = "SELECT * FROM [Abfrage R1 (jährlich)] WHERE [Abfrage R1 (jährlich)].[Sold to number] Like '" & Me!Liste206.Column(0) & "' "
'write information in new Form
        Form_FinanceScreenCustomer.Visible = True
        Form_FinanceScreenCustomer.Text0.Value = "" & Me!Liste206.Column(0) & ""
        Form_FinanceScreenCustomer.Text2.Value = "" & Me!Liste206.Column(1) & ""
        Form_FinanceScreenCustomer.Text13.Value = "" & Me!Liste206.Column(7) & ""
        Form_FinanceScreenCustomer.Text15.Value = "" & Me!Liste206.Column(9) & ""
        Form_FinanceScreenCustomer.Text17.Value = "" & Me!Liste206.Column(11) & ""

        Form_FinanceScreenCustomer.Liste4.RowSource = varStatement
        Form_FinanceScreenCustomer.Liste4.Requery
        intz = Me!Liste4.ListCount - 1
        Me!Liste4.Selected(intz) = True
End Sub

Das füllen der Textfelder funktioniert ohne Probleme. Nur wird die Liste in Formular zwei nicht gefüllt mit der Fehlermeldung:


Der Fehler liegt in den folgenden beiden Zeilen:

Code:

        intz = Me!Liste4.ListCount - 1
        Me!Liste4.Selected(intz) = True

Wie es aussieht findet er Liste4 in dem zweiten Formular nicht. Wie kann ich Access sagen, dass er nun in einem anderen Forumlar ist?

 

Me! bezieht sich immer auf das gerade aktive Formular - in deinem Fall also das Formular, in dem sich das Feld Liste206 befindet.
Wenn du auf das Feld in einem anderen Form zugreifen willst, dann musst du anstelle von Me! den Formularnamen verwenden.

 

Ich habe gerade keinen Zugriff auf Access (huch, wie widersprüchlich...), aber bitte nochmals versichern:

"Me" ist, glaube ich, nicht das "aktive" Formular, sondern das "eigene", also das, in dem sich der Code befindet, der gerade ausgeführt wird.

leicht zu überprüfen:
Button1 und Edit1 auf Formular1
Edit2 auf Formular2
im Onclick des Button1:
Formular2 öffnen / aktivieren
v1=me!edit1.text
v2=me!edit2.text

Mal gucken, welche Zeile den Fehler verursacht... (Ich tippe auf die mit v2.)

Gruß, Michael

 

Genau genommen hast du damit sogar recht!

Man muss hier unterscheiden zwischen einem aktivierten Formular und dem Formular, in dem gerade "aktiv" ein Code ausgeführt wird.
"Me" bezieht sich in sofern auf das Formular, in dem der Code hinterlegt und ausgeführt wird.