Default font

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Lasci - 25 Oct 2006 12:36 GMT

Hi all,
Is it possible to code (in VB) the changing of the default font? I can`t
seem to find much on this...

Thanks!

Reply to this Message

Jezebel - 25 Oct 2006 12:50 GMT

There isn't a default font as such. There is a default style, and the
defualt style has a font. Change that.

> Hi all,
> Is it possible to code (in VB) the changing of the default font? I can`t
> seem to find much on this...
>
> Thanks!

Reply to this Message

Lasci - 25 Oct 2006 13:06 GMT

Hi,

I know how to change it manually, but the coding of setting the default part
is the bit I cannot do....

> There isn't a default font as such. There is a default style, and the
> defualt style has a font. Change that.
[quoted text clipped - 4 lines]
> >
> > Thanks!

Reply to this Message

Jezebel - 25 Oct 2006 14:16 GMT

activedocument.styles("Normal").font.Name = "Friz Quadrata"

> Hi,
>
[quoted text clipped - 11 lines]
>> >
>> > Thanks!

Reply to this Message

Lasci - 25 Oct 2006 14:42 GMT

Thanks for this, however this is the same code as I have already tried. It
sets the font in the document, but does not change the default font at all....

> activedocument.styles("Normal").font.Name = "Friz Quadrata"
>
[quoted text clipped - 13 lines]
> >> >
> >> > Thanks!

Reply to this Message

Jean-Guy Marcil - 25 Oct 2006 15:23 GMT

Lasci was telling us:
Lasci nous racontait que :

> Thanks for this, however this is the same code as I have already
> tried. It sets the font in the document, but does not change the
> default font at all....

Try this:

Dim docNew As Document

Set docNormal = NormalTemplate.OpenAsDocument

With docNormal
.Styles("Normal").Font.Name = "Arial"
.Close SaveChanges:=wdSaveChanges
End With

Signature

Salut!
_______________________________________
Jean-Guy Marcil - Word MVP
jmarcilREMOVE@CAPSsympatico.caTHISTOO
Word MVP site: http://www.word.mvps.org

Reply to this Message