Office: (Office 2007) Anfügeabfrage per VBA ausführen

Hallo liebes Forum.

Ich suche schon den halben Tag nach der Ursache von folgendem Problem.

Ich erstellte eine Anfügeabfrage namens "qry_Offerten_Kennung_anfügen".
Der SQL-Code sieht dort wir folgt aus:
Code:

Wenn ich diese Anfügeabfrage per Code
Code:

ausführe, erscheint die Meldung
"1 Parameter wurden erwartet, aber es wurde zu wenigen Parameter übergeben"."

Unter Abfragetools -> Ausführen, klappt der Code super.


Nach vielem Ausprobieren kam ich darauf, dass es an dem Kriterium (WHERE-Bedingung) "[Frm_Eingabe_Tagespreis]![Offertennummer]" liegen muss bzw. an den Hochkommas oder Anführungszeichen liegen muss '[Frm_Eingabe_Tagespreis]![Offertennummer]' oder "[Frm_Eingabe_Tagespreis]![Offertennummer]".

Scheinbar gibt es aber einen Unterschied zw. der Eingabe in der Abfrage selbst und deren Ausführung unter VBA.

Für jeden heißen Tipp bin ich sehr dankbar.

Vielen Dank & schöne Grüße

:)

 

Die Methode .execute funktioniert nicht, wenn Du ihr den Namen der Abfrage übergibst.
Du musst
a) die SQL Anweisung in einen String schreiben und
b) den String als Argument an .execute übergeben

Und wenn Du das in dem Formular Frm_Eingabe_Tagespreis veranstaltest, dann reicht es auch, den Wert für Offertennummer so zu übergeben:
Code:

... der muss aber ausserhalb des Strings stehen ... also so:
Code:

Und wenn die Offertennummer ein Textfeld ist, müssen da noch Apostrophen drum ...
Code:

 

Hallo,

ergänzend zu Hans-Christians Bemerkung:

teste zunächst mal den Ersatz von [Formulare] durch [Forms].

Ansonsten wäre natürlich der Datentyp von [Offertenummer] zu beachten: Als Text erfordert er Hochkommatas.

 

Danke für Eure Hilfe!

Ginge es auch ohne SQL-String - sprich direkt aus einer Abfrage heraus?
Oder ist dies nicht vorgesehen?

Vielen Dank noch einmal!

 

Ja. Führst Du diese Abfrage direkt in Access aus, kümmert sich das fürsorgliche Access um die zielgenaue Parameterübergabe (Lesen des Formulartextfeldes).
Bei der Ausführung per VBA wird die Abfrage an die Jet-Engine übergeben. Die kennt nur Tabellen und Abfragen, aber keine Formulare und Berichte. Somit kann sie mit dem Formulartextfeld nichts anfangen und fragt daher separat nach diesem unbekannten Begriff bzw. dessen Inhalt.

Auswege:

1) Den hat Hans-Christian gezeigt. Durch das Zusammensetzen des SQL-Strings wird erst der Wert des Formularfeldes ermittelt und direkt in die SQL-Anweisung übergeben.

2) Du übergibst den Parameter artgerecht, siehe
Parameterabfrage per VBA öffnen
Insert oder Update als Parameter-Abfrage

 

Hallo zusammen,

in Ergänzung des bereits Geschriebenen:
Das konkrete Problem besteht in dem Formularfeldbezug in der Abfrage.
Durch die Verwendung der Eval-Funktion kannst du den Formularbezug
beibehalten und das Problem umgehen.
Siehe: FAQ 6.4

Nun hast du mehrere Lösungsansätze; suche die den 'besten' aus. *wink.gif*

 

Hallo an alle Helfer!

Vielen lieben Dank für Eure vielen und ausführlichen Tipps.
Konnte viel dabei mitnehmen.

Am Ende entschied ich mich für die "Eval"-Funktion, da diese, für mich, am einfachsten umzusetzen ist.

Es klappt wunderbar! Nun kann das Projekt weitergehen.

Vielen Dank & schöne Grüße