Parameterabfrage via Formular starten

[Benjamin Koch]

Hallo NG

Ich habe folgendes Problem: In einem Formular sollen 3 Werte über 3
Dropdownfelder ausgewählt werden. Danach muss über ein Button eine
Parameterabfrage gestartet werden, die diese 3 Werte als Parameter
verwendet.
Ich habe versucht die Abfrage mit einem Makro zu starten und die Parameter
via Tastaturbefehle in die Parameterabfragefenster einzugeben. Dies
funktioniert aber nicht, da das Makro nicht weiterläuft, wenn das Öffnen der
Abfrage nicht abgeschlossen wurde. Das heisst, die Tastaturbefehle kommen
erst zum Zuge wenn die Abfrage mit "falschen" von Hand eingegebenen
Parametern von Hand gestartet wurde, was ich aber eigentlich gerne
verhindern möchte.
Ich habe donkarl.com nachgeschaut, und 6.16 kam meinem Problem schon relativ
nahe, mein Problem ist halt einfach, das ich sehr wenig bis gar keine Ahnung
von VBA habe, was konkret bedeutet, dass ich nicht weiss wie ich den
RecordSet danach weiterverarbeiten kann.
Darum wäre ich sehr froh, wenn ihr eine andere möglichkeit kennt und diese
mir offenbaren würdet.

Vielen Dank im Voraus
mfg Benjamin

[Benjamin Koch]

[Henry Habermacher [MVP Access]]

Hallo Benjamin

"Benjamin Koch" <ad...@ysix.ch> wrote in message
news:O9vpD9CmBHA.2472@tkmsftngp03...

Wieso willst Du das mit einer Parameterabfrage lösen? Und PFUI-Sendkeys
zu verwenden ist wohl wirklich überflüssig.
Du kannst das SQL Statement doch ziemlich einfach selber
zusammenstiefeln, wenn Du die 3 Dropdowns auswertest oder in der Abfrage
auf diese Dropdowns verweisen, dann wird der SQL Interpreter diese Werte
selber einlesen. zB:

SELECT * FROM DeineTabelle
WHERE DeinFeld1 = Forms("DeinForm")!DeinCombo1
AND DeinFeld2 = Forms("DeinForm")!DeinCombo2
AND DeinFeld3 = Forms("DeinForm")!DeinCombo3

Das dann mit Copy-Paste in eine neue Abfrage in der SQL Ansicht
eingefügt und auf Deine Namen angepasst sollte dann, wenn Du die Abfrage
lieferst, die Werte aus dem Formular übernehmen.

Gruss
Henry

--
Keine E-Mails auf Postings in NGs senden!
Don't send e-mails to postings in newsgroups!
KB: http://support.microsoft.com/default.aspx
FAQ: http://www.donkarl.com/FAQ/FAQStart.htm
MVP: http://support.microsoft.com/support/mvp

[Stefan Baumgart]

Hallo Benjamin,

du öffnest deine Abfrage, die gestartet werden soll im
Abfrageeditor. Dort gibst du als Kriterium im Feld1
folgendes ein:
Formulare!MeinAbfrageFormular!Dropdownfeld1
als Kriterium für Feld2:
Formulare!MeinAbfrageFormular!Dropdownfeld2
u.s.w.

Mein Abfrageformular ist dabei der Name deines Formulars,
Dropdownfeld1 der Name deines 1.Dropdownfeldes...(ist
sicher auch klar)

Für den Button in deinem Formular, welcher die Abfrage
aufrufen soll, stellst die Eigenschft 'bei Click' auf
Ereignisprozedur.
Der Code für die Prozedur lautet:

Private Sub Button_OnClick()
DoCmd.OpenQuery "DeineAbfrage", acNormal, acEdit
End Sub

Die Abfrage sollte jetzt funktionieren.
Anmerkung:
Die Eigenschaft 'Gebundene Spalte' deiner Dropdownfelder
muss auf die Spalte verweisen, die die Parameter für die
Abfrage bereitstellt.

MfG
Stefan

>-----Originalnachricht-----

>.
>