Werte an ein anderes Formular/Feld übergeben

Computer: Software & Programmierung Microsoft Access
#1

Guten Tag

Ich habe ein Problem und komme nicht so richtig auf die Lösung. Deshalb hoffe ich mal das ihr mir weiter helfen könnt.

Ich habe ein ungebundenes Formular und darin ein Listenfeld, welches mir über eine SQL-Anweisung die Daten meiner Tabelle anzeigt. In diesem LF stehen die wichtigsten Daten drin. Nun möchte ich das die ID (Autowert meiner Tabelle) per Befehlsschaltfläche an mein nächstes Formular weitergereicht wird. Im Formular zwei werden die ganzen Angaben der Tabelle nochmal in einzelnen Feldern angezeigt. Dieses Formular ist gebunden an meine Tabelle. Wenn der Wert an mein „KennID“ Feld übergeben wird, sollen die Daten angezeigt werden, die unter der ID stehen.
Habe es bisher folgendermaßen probiert.
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
Private Sub Befehl21_Click()
Dim auswahl As String
Dim eintrag As Variant

For Each eintrag In Me.lf_sondernutzung.ItemsSelected
auswahl = auswahl & „KennID = '“ & Me.lf_sondernutzung.ItemData(eintrag) & „’ OR "
Next eintrag
If Not auswahl = „“ Then
auswahl = Left(auswahl, Len(auswahl) - 3)
Else
auswahl = 0
End If
DoCmd.OpenForm „Datenfassung“, , , , , , auswahl = " & Me!KennID“
End Sub

Im Formular zwei:
Private Sub Form_Load()
Me.KennID = Me.OpenArgs
End Sub

oder über

Filter = „Me.KennID = '“ & Me.OpenArgs & „’“
FilterOn

verwende im übrigen Access 97

Ich danke schon mal im vorraus.

#2

Hallo,
das geht ganz einfach mit dem Assistent für Command buttons.
Einfach díe Option Formular öffnen wählen, das Formular angeben und angeben ob alle Sätze oder nur der eine mit dem Bezug zum Ausgangsgangsformular.
5 Mausklicks und fertig.
Gruß Hans

#3

Ich danke schon mal für den Tip. Es hat wunderbar funktioniert, manchmal geht es halt doch auf einfachen Wege.

Wie mache ich es allerdings, wenn ich einen Wert, den ich in ein Textfeld zurückgegeben bekomme an ein anderes Formular (ungebunden) und darin enthaltenen Textfeld weiter geben möchte?

Danke schön

wäre toll wenn man mir hier auch noch weiterhelfen könnte.

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

#4

Wie mache ich es allerdings, wenn ich einen Wert, den ich in
ein Textfeld zurückgegeben bekomme an ein anderes Formular
(ungebunden) und darin enthaltenen Textfeld weiter geben
möchte?

Danke schön

wäre toll wenn man mir hier auch noch weiterhelfen könnte.

Hi,

vieleicht koennte dir da eine globale Variable helfen.

Einfach in einem Modul ein Variable definieren

Public myVal as String

Die kann man in dem aufrufenden Formular versorgen und im OnOpen des gerufenen Formulars auslesen.

Tschau
Peter

#5

Hallo,

da gibt es wie meistens mehrere Lösungswege.
Wie bereits beschrieben mit einer globalen Variablen.
Oder auch direkt mit code behind the forms.
Wenn das neue (ungebunde) Formular und das Formular mit dem Upgedaten Textfeld beide offen sind:
Eine kleine Prozedur in dem Formular mit dem Update.
Aktion für das Textfeld (afterupdate)
dann form[formularname].Textfeld. = me. text
Fertig.

Versuchs mal. Das ist wirklich alles einfach.

Gruß Hans