Ergebnis einer Query in Makro weiterverarbeiten

[RobertG]

Hallo OG,

zeigt das Select-Feld denn den Inhalt an, d.h. könntest Du etwas auswählen?
Liefer doch einmal einen Scrennshot von Eigenschaften → Listenfeld → Daten.

Gruß

Robert

[Originalgangsta]

Hi Robert,

ja, ich kann aus dem gefüllten Listenfeld einen Eintrag auswählen und speichern, nur wird die ID der Auswahl nicht wirklich gespeichert. Eine Fehlermeldung erfolgt auch nicht.

Anbei der screenshot von Listenfeld - Eigenschaften - Daten.

Danke!
OG

[Acco]

Hi,

Du willst die "ID" wirklich im Datenfeld "Organisation" speichern?

Gruß

acco

[Originalgangsta]

Hi acco,

Hinweis richtig, Datenfeld auf "ID_Organisation" geändert und schon läufts.

Bleibt eigentlich aus dem ganzen Thread nur noch eine Frage offen: Wenn ich ein array fülle (unabhängig von der hier gefundenen Lösung) kann ich mir den Inhalt in einer Messagebox ausgeben lassen?

Danke Dir und allen Helfenden!

OG

[RobertG]

Hallo OG,

mit der einfachen Ausgabe in eine msgbox klappt das erst einmal nicht. Da musst Du das Array schon zu einem Strung zusammenfassen.
Mit
oListFeld.StringItemList
bekommst Du die angezeigten Texte.
Mit
oListFeld.ValueItemList
bekommst Du die Werte, die in die darunterliegende Tabelle geschrieben werden.

Code: Alles auswählen

DIM stAnzeige AS STRING
stAnzeige = ""
FOR i=LBound(oListFeld.StringItemList()) TO UBound(oListFeld.StringItemList())
stAnzeige = oListFeld.ValueItemList(i)+': '+oListFeld.StringItemList(i)
NEXT
msgbox stAnzeige

Vielleicht funktionierts damit. Ich habe das jetzt nicht weiter getestet.

Gruß

Robert