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.
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.
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")