User Tools

Site Tools


vba:tutorials:sqldate

[VBA][SQL][Access] Aus VBA ein Datum in SQL einsetzen

Nun gut, der Titel ist noch nicht das Gelbe vom Ei.
Es geht um folgendes. Mit VBA muss man des öftern Bedinungen für SQL Abfragen oder ObenForm Kriterien, Filtern etc. zusammensetzen. Wenn da mit Datum und/oder Zeit gearbeitet wird, ist es nicht mehr ganz trivial.

Zuerst mal eine unvollständige Auflistung, wo das folgende Tutorial über greift

  • In VBA zusammengesetzte SQL-String
  • In Filterbediningen auf Formular-, Report- und Recordsetobjekte
  • In Filterbediningen für DLookup(), DCount() etc.

Kommen wir zum Punkt. Eine Bedinung ist ein ein Filterstring, der meistens zusammengesetzt wird. Darin gelten stehts SQL-Formatierungen. SPrich, Reine Texe müssen in ' oder “ gefasst werden, Zahlen sind ohne Seperatoren und Datum/Zeit ist im amerikanischen Datusformat

Format Beispiel Formatstring für den format() Befehl Anwendung
String
'text'
'Mein Text'
"[myField] = '" & myStringVar & "'"
"text"
"Mein Text"
"[myField] = """ & myStringVar & """"
Zahl
0.00
1234.56
"[myField] = " & myNumberVar
Datum
#MM/DD/YYYY#
#09/21/2016#
\#\/MM\/DD\/YYYY\#
"[myField] = " & format(myDateVar, "#\/MM\/DD\/YYYY\#")
Zeit
#HH:NN:SS#
#13:06:54#
\#HH:NN:SS\#
"[myField] = " & format(myDateVar, \#HH:NN:SS\#)
Datum + Zeit
#MM/DD/YYYY HH:NN:SS#
#09/21/2016 13:06:54#
\#\/MM\/DD\/YYYY HH:NN:SS\#
"[myField] = " & format(myDateVar, \#\/MM\/DD\/YYYY HH:NN:SS\#)

Siehe auch http://www.office-loesung.de/p/viewtopic.php?f=167&t=723793#p3003777

vba/tutorials/sqldate.txt · Last modified: 21.09.2016 16:32:04 by yaslaw