Supportnet / Forum / Datenbanken
Fornular mit bestimmten Datensatz öffnen von anderen Formular mit Doppelklick
Frage
Formularaufruf mit Doppelklich auf einen bestimmten Tabellensatz(Anzeige Datenblatt), dieser soll da ein anderes Formular gleich mit dem Datensatz anzeigen,
bei mir geht er immer auf den ersten Satz.
Bitte um Lösung in VBA und MAkro wenn möglich
Antwort 1 von Newan
Schreib doch mal den Quelltext den du schon hast eventuell können wir den ja noch umbauen dann müssen wir nicht von vorne anfangen??
Newan
Newan
Antwort 2 von Woodman
Hi ich hab das selbe Problem, ich krieg aber einfach nich raus wie ich den Datensatz den ich markiert habe übergebe.
Anbei das was ich so an Code fabrieziert habe.
Liste2 ist das Listenfeld inwelchem die Ergebnisse einer Abfrage angezeigt werden, Spalte 5 enthält die ID des Datensatzes.
Private Sub Liste2_DblClick(Cancel As Integer)
If Len(Trim(Nz(Me!Liste2))) > 0 Then
DoCmd.OpenForm "Berichte", acNormal, , "[Berichte]![ID]" = Me!Liste2.Column(Me!Liste2.ListIndex, 5)
End If
End Sub
Anbei das was ich so an Code fabrieziert habe.
Liste2 ist das Listenfeld inwelchem die Ergebnisse einer Abfrage angezeigt werden, Spalte 5 enthält die ID des Datensatzes.
Private Sub Liste2_DblClick(Cancel As Integer)
If Len(Trim(Nz(Me!Liste2))) > 0 Then
DoCmd.OpenForm "Berichte", acNormal, , "[Berichte]![ID]" = Me!Liste2.Column(Me!Liste2.ListIndex, 5)
End If
End Sub
Antwort 3 von MickK
@Woodman
beim Openform bezieht man sich bei der [WhereCondition] auf die Tabellenspalte, d.h. wenn bei Dir in der Tabelle die Spalte ID existiert, dann:
wenn ID vom Typ Zahl
wenn ID vom Typ Text
Bitte das unterschiedliche Verknüpfen mit dem Wert beachten.
Gruß
Mick
beim Openform bezieht man sich bei der [WhereCondition] auf die Tabellenspalte, d.h. wenn bei Dir in der Tabelle die Spalte ID existiert, dann:
wenn ID vom Typ Zahl
DoCmd.OpenForm "Berichte", acNormal, , "ID = " & Me!Liste2.Column(Me!Liste2.ListIndex, 5)
wenn ID vom Typ Text
DoCmd.OpenForm "Berichte", acNormal, , "ID = '" & Me!Liste2.Column(Me!Liste2.ListIndex, 5) & "'"
Bitte das unterschiedliche Verknüpfen mit dem Wert beachten.
Gruß
Mick

