Seite 1 von 1

[SOLVED] Datum Heute + 2 Wochen

Verfasst: Mi 26. Mär 2014, 19:41
von xundeenergie
Hi Leute!

Wie mache ich es richtig?
Ich hab die Sequenz

Code: Alles auswählen

sub datum
	Dim sDatum As Date
	sDatum = format (date(),"DD.MM.YYYY")
        msgbox sDatum
end sub
gefunden. sDatum soll aber immer Jetzt + 2 Wochen sein.

lg xundeenergie

Re: Datum Heute + 2 Wochen

Verfasst: Mi 26. Mär 2014, 19:58
von karolus
Hallo

Code: Alles auswählen

sub datum
   sDatum = format (date()+14 ,"DD.MM.YYYY")
        msgbox sDatum
end sub
dim sDatum as date ist Blödsinn, weil format(...) eh einen string zurückgibt

Re: Datum Heute + 2 Wochen

Verfasst: Do 27. Mär 2014, 19:00
von xundeenergie
Hi
karolus hat geschrieben:Hallo

Code: Alles auswählen

sub datum
   sDatum = format (date()+14 ,"DD.MM.YYYY")
        msgbox sDatum
end sub
dim sDatum as date ist Blödsinn, weil format(...) eh einen string zurückgibt

Danke. Hat super funktioniert. Hab das zwar so ähnlich ausprobiert gehabt, aber bekam eine Fehlermeldung. Aber so gehts.

lg xundeenergie