von peterschleif » Sa, 09.01.2010 13:17
Hallo.
Code: Alles auswählen
Sub onDocumentOpen()
If ThisComponent.ImplementationName = "SwXTextDocument" Then
ThisComponent.RecordChanges = False
End If
End Sub
Das Makro speicherst Du entweder nur in der Writer-Datei (dann kann die If-Abfrage entfallen) oder global in "MeineMakros". Das Makro musst Du nun noch dem Ereignis "Dokument öffnen" zuweisen - natürlich passend zum Speicherort. Also auch hier wieder nur in der Datei oder global in OpenOffice.org.
Peter
Hallo.
[code]Sub onDocumentOpen()
If ThisComponent.ImplementationName = "SwXTextDocument" Then
ThisComponent.RecordChanges = False
End If
End Sub[/code]
Das Makro speicherst Du entweder nur in der Writer-Datei (dann kann die If-Abfrage entfallen) oder global in "MeineMakros". Das Makro musst Du nun noch dem Ereignis "Dokument öffnen" zuweisen - natürlich passend zum Speicherort. Also auch hier wieder nur in der Datei oder global in OpenOffice.org.
Peter