PDA

Vollständige Version anzeigen : Listenfeld


pietsche
23.03.2004, 11:52
Mahlzeit,

mein HF beruht auf einer Abfrage.
Mit hilfe eines Kombofeldes wähle ich ein Jahr aus.
Daraufhin popt ein neues Formular mit einem Listenfeld auf indem die Daten zum ausgewählten Jahr angezeigt werden.


1.Ich möchte nun das bei Auswahl eines DS im Listenfeld die korrekten Daten in die Felder meines HF übernommen werden.

Was ich bis jetzt habe:

Private Sub lstSchulAuswahl_AfterUpdate()
Dim rs As Object

Set rs = Me.Recordset.Clone
rs.FindFirst "[SchulID] = " & Str(Nz(Me![lstSchulAuswahl], 0))
If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub



Könnt ihr dabei bitte auf die Sprünge helfen?
Muss ich da nicht noch was bei der Aktion BeimKlicken zuweisen?

JR²
23.03.2004, 11:55
Was ist denn nun das Problem ??
Es hört sich für mich so an, als ob alles so funktioniert, wie es soll.

JR²

pietsche
23.03.2004, 12:22
nee leider nicht,

in der Zeile



Set rs = Me.Recordset.Clone



kommt die Fehlermeldung

"Objektvariable oder With Block Variable nicht festgelegt"

wenn ich auf einen DS in der Liste klicke.


Was ist da bloss los?

pietsche
23.03.2004, 12:58
Muss ich da noch einen Requery über das HF laufen lassen?
Oder Code BeimKlicken Aktion einfügen?


Need Help :confused: