Einbindung eines Datum-Auswahldialoges (Date Picker) in Microsoft Access

Um einen Date Picker in Microsoft Access zu nutzen, muss dieser möglicherweise erst einmal über das Werkzeug Weitere Steuerelemente im Formulardesigner eingebunden werden.

Die Bezeichnung des Elementes variiert möglicherweise je nach Windows-Version und installierter Software, bei mir unter Windows Vista nennt es sich “Kalender-Steuerelement 10.0″. Das Element wird dann wie üblich auf dem Formular platziert.

Das Ansprechen des Elements im Code passiert dann folgendermaßen (das Element hat hier den NamenCalendar0):

In der Prozedur Form_Load() könnte man als Default-Datum das Tagesdatum setzen:

Me.Calendar0.Value=Format(Now(), "d/m/yy",vbMonday, vbUserSystem)

Der Parameter d/m/yy stellt klar, dass das Default-Datum im Format Tag/Monat/Jahr übergeben wird, der vbMonday legt den Montag als ersten Wochentag fest, vbUserSystem sagt, dass die erste Kalenderwoche des Jahres gemäß Systemeinstellungen ermittelt werden sollen.

Das vom Anwender ausgewählte Datum kann vom Steuerelement dann wie üblich abgefragt werden:

Datum=Me.Calendar0.Value

#msaccess