Ich bin nicht alt. Ich bin in der Blüte meiner Abnutzung.

Hallo Herr Martin,

ich hoffe es geht Ihnen gut!?

Wir haben heute von unserem Rechenzentrum Office 2021 erhalten.

Öffnen man nun Vordrucke mit dem Formular-Manager, wird das Datum auf Italienisch geschrieben.

Ich konnte rausfinden, dass das italienische Datum durch den VBA-Befehl

ActiveDocument.FormFields("Datheute").Result = Date

geschrieben wird.

Mir ist es jedoch ein Rätsel wieso, weil innerhalb Office alles auf Deutsch steht.

Erstelle ich ein Blanko-Datei mit nur einem Textfeld und der gleichen Funktion, wird das Datum auf Deutsch geschrieben.

Haben Sie eine Idee, wieso das so sein könnte? Freundliche Grüße

Hallo Herr H.,

italienisch … ich erinnere mich. In irgendeiner älteren Word-Version war ständig die Sprache italienisch – das nervte, weil man (ich) sie auf Deutsch (für Rechtschreibung und Silbentrennung) umschalten musste.

ersetzen Sie mal bitte die Zeile

ActiveDocument.FormFields("Datheute").Result = Date

durch

 If ActiveDocument.FormFields("Datheute").TextInput.Format = "D. MMMM YYYY" Then
   ActiveDocument.FormFields("Datheute").TextInput.EditType wdRegularText
   ActiveDocument.FormFields("Datheute").Result = Format(Date, "D. MMMM YYYY")
 End If

Achtung: diese Zeile befindet sich zwei Mal im Code!

Klappt das dann?

####

Hallo Herr Martin,

vielen Dank, Sie sind super 🙂

Das löst unser Problem 🙂

Vielen, vielen Dank.