Office: (Office 2010) Wert an Form übergeben und Funktion starten

Das Ereignis AfterUpdate (und auch andere Ereignisse) wird durch eine Manipulation per VBA nicht ausgelöst, die Funktion musst du also direkt im Programm aufrufen.
Ich warne allerdings vor einer Mischung von Makros und VBA - da blickt irgendwann keiner mehr durch und eine Fehlersuche ist schwierig. Entweder du bleibst bei Makros, was imho deine Möglichkeiten arg einschränkt - oder du arbeitest mit VBA.
Ist dein Teilnehmerformular auch wieder ungebunden? Dann gilt das Gleiche wie schon mal gesagt, das Formular kennt dann den Wert von [TN_KVnr] nicht. Hast du mal debuggt, was Screen.ActiveControl zurückgibt?
maike

 

Hab es herausgefunden

DoCmd.SearchForRecord acDataForm, "Teilnehmer", acFirst, "[TN_KVnr] = '" & Me.OpenArgs & "'"

 

Ich dachte, du wolltest noch irgendwelche Funktionen ausführen? Wenn's nur darum geht, das Formular zu öffnen und auf den entsprechenden Datensatz zu filtern, dann einfach bei entsprechendem Ereignis (Buttonklick oder was auch immer) im anderen Formular:
Code:

maike

 

Das Problem ist, dass das Formular schon vorhanden ist, mit verschiedenen Macros. Was ich aber realisieren sollte, ist mit den Standart Macros entweder nicht machbar oder ich habe es nicht gefunden.

 

Und wieder habe ich ein Problem.
Ich habe eine Liste die ich befüllen möchte.
Mit dem Befehl

PHP:

         Dim rs       As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("Select TN_KVnr, TN_vorname, TN_nachname FROM tbl_TN WHERE TN_vorname Like '*" & Text94.Text & "*' OR TN_nachname LIKE '*" & Text94.Text & "*'  ORDER BY TN_nachname")

Nur weitermachen wenn Daten geliefert wurden
If rs.RecordCount > 0 Then
Do While Not rs.EOF
strListe = strListe & rs!TN_KVnr & ";" & rs!TN_nachname & ";" & rs!TN_vorname & ";"
rs.MoveNext
Loop
Else
MsgBox "Es sind keine Einträge vorhanden!"
End If
rs.Close

With Me.Liste37
.RowSourceType = "Value List"
.ColumnCount = 3
.ColumnWidths = "0cm;2,54;2,54cm"
.BoundColumn = 1
.RowSource = strListe
End With


 

Hallo hulihuli0815,

für ein neues Problem solltest du einen neuen Thread aufmachen. Ist übersichtlicher. *wink.gif*

Gruß
Josef

 

Stimmt.

Beim nächsten Mal.

 

Hallo,
der in #35 gezeigte Code ist zum größten Teil schlicht und ergreifend ersatzlos überflüssig.
Stelle als Datenherkunft für das Kombi die Datenquelle ein und fertig.
Code:

Du neigst zum überflüssigen Programmieren und nutzt die Standardfunktionalitäten von Access nicht.
Die anderen Eigenschaften der Listbox kannst Du direkt in den Eigenschaften vornehmen.