web-dev-qa-db-de.com

Datumsformat "TT/MM/JJJJ" in Excel über VBA

Ich versuche, ein Datum im Format "TT/MM/JJJJ" in Excel-Tabellen durch Excel-VBA zu schreiben. Ich habe es mit Cells(1, 1).Value = Format(StartDate, "dd/mm/yyyy") erreicht. und mein Zellwert ergibt sich aus 30/04/2014, was gut ist .....

Aber es gibt ein seltsames Problem ... Da ich das startDate für den ganzen Monat durchlaufen muss, indem es jedes Mal um 1 addiert wird, wird der nächste Wert 1/5/2014 anstelle von 01/05/2014 bis zum 12. jedes Monats 12/5/2014 und ab dem 13. ändert sich der Monat wieder in zwei Ziffern 13/05/2014.... 

Ich möchte alles in zwei Ziffern, da ich diese Datumsangaben erneut mit der Range.Find-Methode suchen muss, bei der ich mit "dd/mm/yyyy" den Wert übergeben kann.

4
deejay

Ich habe es verstanden 

Zellen (1, 1) .Value = StartDate
Zellen (1, 1) .NumberFormat = "TT/MM/JJJJ"

Grundsätzlich muss ich das Zellenformat einstellen, anstatt das Datum einzustellen.

11
deejay

Ihr Problem besteht darin, dass Sie versuchen, Ihren Monat durch Hinzufügen von 1 zu ändern. Versuchen Sie, Ihren Monat folgendermaßen zu ändern:

NewDate = Format(DateAdd("m",1,StartDate),"dd/mm/yyyy")
1
Martin Jackson