Hallo zusammen,

Mit der nachfolgenden Coding, habe ich bei meiner Excel Version keine Probleme. Es wird immer ein neues Tabellenblatt angelegt. Die Beschriftung setzt sich aus Jahr und Monatsname zusammen. Der Monatsname ist in Deutscher Schreibweise.

Jetzt hab ich die Datei auf einem anderen Pc geöffnet und er hat mir die Monatsnamen teilweise in Deutsch ausgeben und teilweise schrieb er Englische Monate auf. Damit bekomme ich allerdings später Probleme im weiterin Code.

Kann mir jemand beantworten wieso das DateSerial einmal deutsch und einmal gemischte Namen verwendet.

Gruß NATI

Worksheets.Add.Move after:=Worksheets(Worksheets.Count)
ActiveSheet.name = Format( _
DateSerial(vYear, iMonth, 1), "YYYYmmmm")