3
Access - Ausführen query über vba
Hallo Gemeinschaft,
habe in einem Formular ein Datumfeld, welches ich zum Filtern einer Abfrage nehme, die als UFO in diesem Formular die Datwen anzeigt - nun möchte ich einen VBA Code ausführen, der in seiner query dieses Datumfeld als where clausel verwenden soll
so sieht die query im mom aus und anstelle DateValue('5/8/2023') benötige ich den Inhalt des Datumfeldes aus dem Formular
habe in einem Formular ein Datumfeld, welches ich zum Filtern einer Abfrage nehme, die als UFO in diesem Formular die Datwen anzeigt - nun möchte ich einen VBA Code ausführen, der in seiner query dieses Datumfeld als where clausel verwenden soll
strSQL = "SELECT * FROM qry_Kurt where Kd_anreise = DateValue('5/8/2023')" so sieht die query im mom aus und anstelle DateValue('5/8/2023') benötige ich den Inhalt des Datumfeldes aus dem Formular
Share on Facebook
Share on Twitter
Share on Reddit
Share on LinkedinPlease also mark the comments that contributed to the solution of the article
Content-Key: 8068231830
Url: https://administrator.de/contentid/8068231830
Printed on: April 27, 2024 at 06:04 o'clock
3 Comments
Latest comment
Oh man wird immer schlimmer mit deinem Gehirn Outsourcing ..
strSQL = "SELECT * FROM qry_Kurt where Kd_anreise = #" & Format(Me.MeinFeld.Value, "dd\/mm\/yyyy") & "#" 
1
hat nich geklappt
musste es so machen
musste es so machen
TXT = "DateValue('" & Format([Forms]![frm_Kurtaxe]![txt_Anreise].Value, "dd\/mm\/yyyy") & "')"
strSQL = "SELECT * FROM Kurtaxe where Kd_anreise = " & TXT
Klappt bei dir überhaupt mal was ... Geht hier absolut fehlerfrei wenn das Feld auch vom Typ Datum ist, gibt wie immer x Wege nach Rom, aber die erste Station bevor man sich auf den Weg macht führt durch den Pfad => RTFM, da scheinen bei dir überall Stopp-Schilder zu stehen 🤮 🤮 . Mal ein paar Wochen nicht mehr Antworten wird vielleicht helfen...
2