Default Font Size

K

Klaus Linke

Khalid said:
How can I set the Default Font Size programmatically
through VB.?

Thanks
Click to expand...


Hi Khalid,

I think this has been answered elsewhere, but you could use something like
With ActiveDocument.Styles(wdStyleNormal)
.Font.Size = 7.5
End With
to change the size of text in "Normal" style.

To make the change in the attached template, you'd have to open this
template and make the change there (... then, all new documents based on
the template have the new default font size):
Dim myTemplate As Template
Set myTemplate = ActiveDocument.AttachedTemplate
myTemplate.OpenAsDocument
With ActiveDocument.Styles(wdStyleNormal)
.Font.Size = 8.5
End With
ActiveDocument.Close SaveChanges:=wdSaveChanges

Regards,
Klaus
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Centered text that does not stay centered 0
Open my default template when right click, select New MS Word doc within a folder 0
Footer text appears "squished" 1
Object Browser in VBA 0
Need help modifying code 0
How to modify and updte specific styles for specific paragraphs across the document 0
Set as Default Template not working 0
Changing defauls in 2019 0

Top