Hallo Herb,



wenn Du mit Absatzformatierung das Ändern der FVl 'Standard' meinst, geht das in etwa so:

Sub mStandardVL()

CustomizationContext = NormalTemplate

'

With ActiveDocument.Styles("Standard").Font

.Name = "Arial"

.Size = 12

End With

'

With ActiveDocument.Styles("Standard")

.AutomaticallyUpdate = False

.NextParagraphStyle = "Standard"

End With

End Sub

Den Code könntest Du zwecks Automatisierung z.B. in ein Automakro packen.



      Hubert





geschrieben von Hubert , 29.09.2005, 11:21 Uhr , 90 mal gelesen