Global template problem - Set default font

[Paul]

I have aglobally loading template where i store all my
various routines and menus.

The company i work for have a policy that all documents
will be done in Aerial font, however our IT techis have
started to install new machines with the font set at
default and refuse to alter this (jobs worths).

My menu template is loaded onto every machine my company
runs therefore i wanted to write into it code to
automatically alter the normal default font to Aerial
when word starts.

Thats where my problem lies.

I wrote the following code which works fine when start
word and the first document created, however if you
create a second document it reverts back to the old font
it as though the default font hasnt been altered.

Sub test()
If ActiveDocument.Styles(wdStyleNormal).Font.Name
= "Arial" Then

Else
ActiveDocument.Styles(wdStyleNormal).Font.Name
= "Arial"

End If
End Sub

Any ideas how to permanently set the default font stored
in the normal template to Ariel.

I am using word 97.

Cheers Paul

 

[paul]

Please disregard this I have managed to resolve the
problem.

Paul