Ich möchte in einer Überschriften-Zeile eines Blattes prinzipiell N fortlaufende Monate darstellen, und zwar im Format "MMM JJ". Der Startmonat dieser Zeile wird über VBA eingetragen. Gerechnet werden soll im Blatt mit dem 01. des Monats.
Dazu wird ein Datum im Format "tt.mm.jjjj" übernommen, das dann umformatiert wird.
Bisher habe ich das mit
dtMnth = Format(myDt, "MMM")
newDt = dtMnth & " " & Year(myDt)
probiert.
Für Oktober, Dezember und Mai wird allerdings das Jahr im Format JJJJ angezeigt und auch der Wert der Zelle wird mit "MM JJJJ" als String angezeigt (gerechnet wird trotzdem korrekt).
Wenn man stattdessen mit
newDt = Format(myDt, "MMM YY")
arbeitet, gibt es zwar kein Problem mehr mit der Darstellung, aber im Blatt wird nicht mehr gerechnet.
Wenn man umgekehrt das Datum "DD.MM.YYYY" einträgt, wird zwar richtig gerechnet, aber die Zelle ist resistent gegen ein .NumberFormat "mmm-yy".
Vielen Dank.
Lars