Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
564to568
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
564to568
564to568
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

aktuelles Datum um 30 Tage reduzieren

aktuelles Datum um 30 Tage reduzieren
09.02.2005 09:15:44
Detlef
Hallo alle im Forum,
wie kann ich in VBA ein aktuelles Datum um 30 Tage reduzieren.
Vielen Dank für Eure Mühe
Detlef

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
MsgBox Date - 30 o.T.
09.02.2005 09:19:50
Franz
Grüße Franz
AW: aktuelles Datum um 30 Tage reduzieren
UweD
Hallo
So:

Sub minus30()
ActiveSheet.[A1].Value = Format(Date - 30, "DD.MM.YYYY")
End Sub

Gruß Uwe
Danke
Detlef
Danke für Eure Enterstützung
habe mein Problem so im Griff bekommen:
Dim DateReduziert As Date
DateReduziert = DateSerial(Year(Date), Month(Date) - 1, Day(Date))
Danke
Detlef
Das war aber nicht die Frage..
UweD
Ist nämlich was anderes. 28, 29, 30, 31 Tage...
Gruß UweD
Sorry
Detlef
Hallo Uwe,
Du hast recht. Ich wollte von den Tagen eine Möglichkeit haben, bei der Datenübernahme auf einen Bestand von Daten der letzen 30 Tage zuzugreifen. Es kann sein, dass dieser Zeitraum nicht ausreicht. Also 40 oder mehr Tage. Dann wollte ich diese Variable in meinem Programm einbauen und so eine flexieblen Puffer zu haben.
Tage wären schöner als Monat, gebe ich zu.
Danke
Detlef
Anzeige
AW: Das war aber nicht die Frage..
Detlef
Uwe,
Deine Lösung ist besser!
Gerade ausprobiert und 6 Zeilen unnötigen Code gestrichen
Detlef

302 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige