Office: Wert einer sql-Abfrage in VBA an Textfeld übergeben

Hallo,

in einem Formular [frmNeu], das auf einer leeren Tabelle beruht, sollen über 3 voneinander abhängigen Kombinationsfelder Daten ausgewählt werden. Das klappt auch super. Anschließend sollen diese 3 Werte als Abfragekriterium zur eindeutigen Identifizierung eines Datensatzes aus einer anderen Tabelle dienen und einige Daten aus dem selektierten DS sollen bestimmte Felder des Formulars füllen. Das klappt leider nicht so wie gedacht.
Frage ist nun, wie übergebe ich den Wert des Abfrageergebnises an ein Textfeld. Ich glaube, dass es irgendwie mit Recordset zu lösen ist, habe aber leider nicht viel Ahnung davon. *confused.gif*

Hier zum besseren Verständins ein Beispiel:

SQL-Abfrage: "select Feld1 from tblDaten where UNR=" & combUNR & " And WEG = " & combWEG & " AND WENr=" & combWE

Anschließend soll der gefunde Wert aus Feld1 in ein Textfeld (Bsp. Text1) aus dem Formular eingetragen werden.

Kann mir jemand helfen?

Danke
Jacki

:)

 

Das könntest Du mit dem ollen DLookup() lösen. Die Syntax kannst Du in der Onlinehilfe nachschauen.

Ungefähr so:
=DLookup("[Feld1]","[tbldaten]","UNR=" & combUNR & " And WEG = " & combWEG & " AND WENr=" & combWE")

Solltest Du noch mehr Werte aus der Tabelle benötigen, dann bieten sich Recordsets natürlich an. Wie man die einsetzt, kannst Du hier im Forum erfahren (einfach mal suchen).

 

Hallo Arne,

danke für die schnelle Hilfe. DLookUp funktioniert gut. Aber wie Du schon richtig vermutest, benötige ich mehrere Werte aus der Tabelle.

Hast Du einen Tipp zu Recordset oder kennst Du vieleicht ein Thema, in dem das schon behandelt wurde? Hatte schonmal danach gesucht, aber bisher noch nicht das richtige gefunden.

Gruß
Jacki

 

Das kommt jetzt ganz auf die Access-Version an, bzw. ob Du DAO oder ADO einsetzen willst.

Per DAO (ungetestet):
Code:

Den o.a. Code müsstest Du dann per Klick o. einem anderen Ereignisaufrufen. Anschliessend müssten die Felder im Formular gesetzt werden.

 

Super! Funktioniert einwandfrei. Genau so, wie ich es mir vorgestellt habe. Den Aufruf habe ich mit dem Ereignis "nach Aktualisierung" des 3. Kombi-Feldes (combWE) gesetzt.

Vielen Dank nochmlas!
Jacki