As mentioned previously, the reason backing up my Normal.dot won't work is when I call my company IT Help Desk when having problems and they send an OST guy over to investigate, they invariably say that my Normal.dot is corrupt and that is why I'm having problems with this, that and the other. So what they tend to do is kill my Normal.dot and open up Word and allow it to rebuild (or initialize a new Normal.dot). If I kill the new initialized Normal.dot and put my backed-up Normal.dot back and then experience those problems again and have to call IT again, they're going to come up with the same solution, which is again to kill my Normal.dot and reinitialize. That is why all of my macros that I daily use are in an Add-In Template.

The thing is there are company styles that we use. Some have been given aliases and some others have not. I have assigned aliases to those others (that don't have an aliases assigned) that I frequently use, but they always get removed when reinitializing. So I thought maybe if I have a macro that will assign those aliases in one shot rather than me having to go in there and do that all over again, however this is one macro that won't generate using "Record a Macro". Here's what it generates, which doesn't do anything (that's what I meant by it doesn't work - this does nothing when you run it).

Sub Macro1()
'
' Macro1 Macro
'
With ActiveDocument.Styles("_1.0sp Centered")
.AutomaticallyUpdate = False
.BaseStyle = "Normal"
.NextParagraphStyle = "_1.0sp Centered"
End With
With ActiveDocument.Styles("_1.0sp Centered (no space after)")
.AutomaticallyUpdate = False
.BaseStyle = "Normal"
.NextParagraphStyle = "_1.0sp Centered (no space after)"
End With
End Sub

Another thought is this: should I assign those aliases in my Add-In Template, which contains the company styles? Maybe that will solve this problem???? Thanks for your help.