Datumsformat

Hallo
habe ein Problem mit einem Datumsformat.
Im Zuge eines Updates per VBA weise ich die aktualisierten Start- und Endtermine jeweils einer Variablen zu und weise die Werte der Variablen den entsprechenden Zellen in meiner Datei zu.
Allerdings geschieht es desoefteren, dass hierbei Monat und Tag vertauscht werden und ich somit einen falschen Termineintrag habe.
Die jeweiligen Start- und Endtermine sollen als als dd-mmm-yy (26-Jun-15) angezeigt werden. In der mir zugesendeten Datei sind diese ebenso formatiert.
Allerdings sind deren Zellen Benutzerformatiert als B1dd-mmm-yy
Ich habe keine Ahnung was das B1 bedeuten soll. Ein Zellbezug kann das nicht sein, da Zelle B1 eine Ueberschrift einer Spalte ist.
Auch wenn ich die Zelle vor zuweisen des Wertes aus der entsprechenden Variablen wie folgt formatiere
Range("H" & OldCnt).Value = Format(New_Start, "dd - mmm - yyyy")
Range("H" & OldCnt).Value = New_Start
aendert das nichts.
Nur wenn der Tag groesser als 12 ist, also die maximale Zahl der vorhandenen Monate im Jahr ueberschreitet dann wird das Datum richtig uebernommen.
Habe schon alles moegliche ausprobiert und gegoogelt aber nichts gefunden.
Kann mir hier jemand helfen ?
Waere sehr wichtig eine schnelle Loesung zu finden da ich das Makro anfang der naechsten Woche anwenden muss.
Vielen Dank an Euch alle.
Roland

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Hallo Chris,
danke fuer die schnelle Antwort.
Habe es gleich mal ausprobiert. Bei beiden Dateien, meiner und der des kunden, wird die Zahl 1 zurueckgegeben. Also fuer 1 = Tag-Monat-Jahr
Mit desoefteren meinte ich, dass dies nicht jedesmal geschieht wenn ich der Zelle den Wert der Variablen zuweise.
Habe dann aber gemerkt, dass das, so wie ich bereits geschrieben hatte:
"Nur wenn der Tag groesser als 12 ist, also die maximale Zahl der vorhandenen Monate im Jahr ueberschreitet dann wird das Datum richtig uebernommen."
auftritt.
Also wenn das Tagesdatum zwischen 1 u. 12 liegt, dann wird der Monat mit dem Tag vertauscht. Wenn das Tagesdatum groesser als 12 ist nicht, da de Monat ja niocht groesser als die Zahl 12 sein kann.
Es scheint demnach so zu sein, dass beim zuweisen des Wertes zu der Variablen oder beim Zuweisen der Variablen zu der Zelle die Tagesszahl mit der Monatszahl vertauscht wird, sofern die Tageszahl den Wert 12 noicht ueberschreitet.
Allerdings geschieht es auch waehrend eines Makrodurchlaufes, dass bei manchen Zellen, in denen das Datum geaendert wurde das Datum als "dd/mm/yyyy" angezeigt wird obwohl ich die Zelle ja bereits so
Range("H" & OldCnt).Value = Format(New_Start, "dd - mmm - yyyy")
formatiert hatte.
Alles etwas suspekt fuer mich.
Hast Du noch eine Idee ?
Gruss
Roland

Beliebteste Forumthreads (12 Monate)

4 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

4
Beiträge zum Forumthread

Beiträge zu diesem Forumthread