Hallo M.G.
Beim Speichern einer Datei als .docx werden alle Macros rausgeschmissen. Demzufolge gibt es auch nix zu aktivieren. Wie du aber schon richtig erkannt hast, wird auch die Dokumentvorlage geöffnet auf der das neue Dokument basiert. Und darauf bezieht sich dann die Frage, ob du deren Makros aktivieren willst.
Damit das nicht mehr vorkommt, musst du die Vorlage vom Dokument trennen. Diese Funktion ist ein wenig versteckt: Datei -> Informationen -> Auf Probleme überprüfen -> Dokument prüfen -> Button Prüfen -> und an der Stelle mit dem Roten Ausrufezeichen wo was von Vorlage steht auf den Button Alle entfernen klicken.
Das ist natürlich ziemlich umständlich und kann auch gern mal vergessen werden. Einfacher gehts, wenn du das gleich per Makro beim Speichern automatisch mit erledigst:
Füge in der Vorlagendatei ein neues Klassenmodul ein (z.B. Klasse1) und gibt dort diesen Code ein:
Public WithEvents app As Application
Private Sub app_DocumentBeforeSave(ByVal Doc As Document, SaveAsUI As Boolean, Cancel As Boolean)
If Doc.AttachedTemplate.Name = "Vorlage1.dotm" Then
Doc.RemoveDocumentInformation wdRDITemplate
End If
End Sub
Außerdem gibst du im Modul ThisDocument der Vorlage diesen Code ein:
Dim SaveEvent As New Klasse1
Private Sub Document_New()
Set SaveEvent.app = Application
With Selection
.GoTo What:=wdGoToBookmark, Name:="Ueberschrift"
.TypeText Text:="Das ist ein Test"
End With
End Sub
Dann speichern und schließen. Wenn du nun ein neues Dokument basierend auf der Vorlage erstellst musst du nur einmalig die Makros aktivieren. Sobald du das Dokument dann speicherst wird die Verbindung zur Vorlage entfernt.
Gruß Mr. K.
|