Einfügen jedes Datumsdatensatzes für den aktuellen Monat in die Access-Tabelle mithilfe von VBA
Ich bin neu in der VBA-Programmierung. Ich habe eine Form entworfen, in der es einen Knopf gibt. Nach dem Klicken auf diese Schaltfläche möchte ich einen Datensatz mit einer Datumsspalte in meine Tabelle einfügen. Die Anzahl der Dummy-Datensätze sollte der Anzahl der Tage im aktuellen Monat entsprechen. Wenn der Monat Mai 2016 ist, wird der Datensatz mit dem Datum 05.01.2016, 05.02.2016 ... 31.05.2016 so eingefügt.
Danke im Voraus
Private Sub Command0_Click()
Dim strQuery As String
Dim currDateTime As Date
currDateTime = Now()
strQuery = "INSERT INTO tbl_ShipOrders (IDate ) VALUES (" & currDateTime & " )"
CurrentDb.Execute (strQuery)
End Sub