1.1k Aufrufe
Gefragt in Textverarbeitung von Mitglied (926 Punkte)
Private Sub Workbook_BeforeClose(Cancel As Boolean)
ActiveWorkbook.Save
End Sub


Hallo Helfer,
ich habe Makros bisher nur in Excel genutzt. Das obige Makro funzt dort.
Wie muss ich es für Word anpassen, damit es auch in Word funzt?
mfg
Wolfgang

3 Antworten

0 Punkte
Beantwortet von Mitglied (926 Punkte)
Hallo,
hab schon 2mal "Workbook" durch "Document" ersetzt.
Ist der Ort "Normal", ThisDocument" richtig?
mfg
Wolfgang
0 Punkte
Beantwortet von m-o Profi (22.7k Punkte)
Hallo Wolfgang,

öffne den VBA-Editor und gehe in das VBA-Projekt des betreffenden WORD-Dokuments (achte darauf, dass das Makro nicht in der Normal.dot gespeichert wird). Klicke auf den Ordner "Microsoft Word Objekte" und dann auf "This document" und gib das folgende Makro ein:

Private Sub Document_Close()
ActiveDocument.Save
End Sub


Nun wird dein Dokument vor dem Schließen automatisch gespeichert (das Dokument sollte bereits abgespeichert worden sein).

Gruß

M.O.
0 Punkte
Beantwortet von Mitglied (926 Punkte)
Hallo M.O.
Vielen Dank.
mfg
Wolfgang
...