Office: Daten aus einem Listenfeld in ein Textfeld übergeben

Hallo Liste,

ich kommen einfach nicht weiter mit meinen Problem. Vielleicht handelt es sich bei mir auch nur um einen Denkblockade. Ich hoffe hier im Forum einen Hinweis zubekommen *Smilie

Hier mein Problem:

In der Datenbank sind 3 Tabellen enthalten

tblKunde
tblText
tblKundeTextDetail

tblKunde, enthält die üblichen Felder KundeID, NAME, STRASSE, ORT, PLZ .......

tblText, enthält 4 Felder TextID; TextNr; Beschreibung ; BemerkungJaNein

tblKundeTextDeatail, enthält DetailID; TextNr; Bemerkung; KundeID


Das Hauptformular bzieht seine Daten aus tblKunde

Ein Unterformular ist eingebunden und ist verknüpft mit der KundenID des Hauptformulars. Die Daten des Unterformulars werden in der tblKundTextDatails gespeichert.

Im Unterformular ist eine Ereignis beim Doppelklick im Feld TextNr hinterlegt. Die prüft als erstes ob das Textfeld leer ist, wenn es leer ist wird ein Suchformular gestartet. Das Suchformular besteht aus einem Textfeld und einem Listenfeld. In dem Listenfeld wird eine Abfrage auf der Basis der tblText angezeigt.
Ich möchte nun den im Listenfeld ausgewählten Datensatz in das Textfeld des Unterfomulars einfügen. Dabei ist der 2 übergebene Wert aus dem Listenfeld, denn denn ich brauche. Also DetailID(nicht) TextNr( diesen Wert) .....

Wenn der Datensatz eingefügt wird soll das Feld Bemerkung Sichtbar sein, wenn in der Wert aus dem Listenfeld "BemerkungJaNein" auf 1 ansonsten nicht. Damit soll verhindert werde, dass der Benutzer eine Bemerkung eingeben kann obwohl das nicht erlaubt ist.


Vielleicht habt Ihr einen Tipp für mich, wie ich das Problem lösen könnte.

Danke im voraus


Bis bald!

Gruss
Matthias

:)

 

Hallo motw

hier wie Du den Wert aus einem Listenfeld erhälst:
Code:

Beachte: die 1 steht für die 2. Spalte! Voraussetzung ist, dass ein Element in der Liste markiert ist!

hier wie Du einem Textfeld im einem Unterformular einen Wert zuweisen kannst:
Code:

Und was Du nun brauchst ist wohl einfach eine Kombination:
Code:

Beachte: Dies funktioniert nur, wenn diese Zeile im Formular mit dem Listenfeld aufgerufen wird (wegen der Objektbezeichnung 'Me.'

Gruz
SiS

 

Hallo StehtimSchilf!

Vielen Dank!

Das war geanu das, was zur Lösung meines kleinen Problems geführt hat *Smilie


Ich wünsche noch ein schönes WE!

Gruss
Matthias