Why are you trying to access Normal.dot through code? That makes no sense at all for what you said you want to do:
Quote:
|
change a specific heading style in my document to another heading style
|
All you need for that is to use Find/Replace to replace one Style with the other.
Given that we're dealing with heading styles, you would only access Normal.dot to:
• modify an existing Style, so that the change applies to all documents. But, since that would only be done once, you wouldn't use code; or
• to ensure a current Style definition gets carried over to the document being opened. In that case, you
might use code like:
Code:
Private Sub Document_Open()
With ActiveDocument
Application.OrganizerCopy Source:=.AttachedTemplate.FullName, Destination:=.FullName, _
Name:=.Styles(wdStyleHeading2).NameLocal, Object:=wdOrganizerObjectStyles
End With
End Sub
Which you would put into the Document's 'This Document' module. If you were to put it into the Template's 'This Document' module, it could adversely affect documents that shouldn't be changed.
Depending on what you're trying to achieve, though, all you might need to do is to check the 'automatically update document styles' option.