Hi,
ich weiß leider nicht wie ich dir hier in dem Forum eine Datei zur Verfügung stellen kann. Ich kopiere dir aber mal den Code von meinem Makro hier rein.
Sub AutoNew()
With Selection
.GoTo What:=wdGoToBookmark, Name:="Ueberschrift"
.TypeText Text:="Das ist ein Test"
End With
End Sub
Ich habe eine Textmarke erstelle, die sich "Ueberschrift" nennt. Dort soll beim Öffnen einer neuen Vorlage automatisch etwas hingeschrieben werden. In dem Beispiel wird einfach nur "Das ist ein Test" hingeschrieben. Das funktioniert auch alles.
Dann speicher ich das Dokument als Word-Datei ohne Makros ab und werde beim nächsten mal doch wieder danach gefragt, ob ich die Makros aktivieren will. Es wird aber kein Makro mehr ausgeführt.
Hilft der Code weiter? Bzw. weiß vielleicht jemand, wie ich eine Datei zur Verfügung stellen kann?
Danke euch
|