Hallo, ich möchte einen Datumsbereich bestimmen lassen,
( z.B. 17.5.01 bis 28.3.02)
beginnend ab einem bestimmten Tag, dieser Tag soll das Startdatum sein, ich möchte dann über das ganze Jahr alle Monate und Tage bekommen, als Werte für weitere Berechnungen.
Es soll eben auch möglich sein, über das Jahr hinaus ins neue Jahr 2001 die Werte zu erfassen.
It nicht so einfach, haeb ich schon festgestellt.
Mit CDate ging es nicht so gut, ich dachte DateValue läuft etwas besser, meine ich.
Wer hat mal ein Beispiel oder eine Idee?
Jede Antwort ist willkommen und können auch an die Mailadresse direkt gehen.
habe mal einen Bericht erstellen müssen, welcher mir für jeden Tag eines gewünschten Zeitraums ein Kalenderblatt ausdruckt.
Vielleicht hilft es Dir weiter.
Gruß
Gerd
Private Sub sfDrucken_Click()
On Error GoTo Err_sfDrucken_Click
Dim cnn As ADODB.Connection
Set cnn = CurrentProject.Connection
'Zum letzten Datensatz gehen
rs.MoveLast
'Wenn mehr als Null Datensätze vorhanden sind, alles löschen
If rs.RecordCount > 0 Then
rs.MoveFirst
Do Until rs.EOF
rs.Delete
rs.MoveNext
Loop
End If
'Neue Einträge in Tabelle tblKalenderblatt eintragen
Dim varDatum As Date
'varDatum auf Formular Kalenderblatt Textfeld DatumVon setzen
varDatum = Forms!frmKalenderblatt!tfDatumVon
'Solange Zeilen anfügen bis Formular Kalenderblatt Textfeld DatumBis erreicht ist
While varDatum