How to set the "Do not embed common system fonts" property in Word object?

Posted on 2004-11-12
Last Modified: 2013-12-03
Hi guys,

How do you set the property "Do not embed common system fonts" to true using VBA? This option can be found under EmbedTrueTypeFonts property in Word (Tools>>Options>>Save tab). Could it be not possible at all programmitically? I have looked around and not found a definite answer.

Question by:rb79

    Author Comment

    BTW for our Word DOC reports, setting EmbedTrueTypeFonts to true and the property "Do not embed common system fonts" to true results in reducing the Word file size from >800kB to ~230kB.
    That's a big improvement. Just switching off EmbedTrueTypeFonts to false helps too (~250kB) but I would like to know if the property "Do not embed common system fonts" be accessed programmitcally.

    LVL 80

    Accepted Solution

    Hi Raj,

    Sub Embedder()
    ActiveDocument.EmbedTrueTypeFonts = True    'This statement is not necessary to set DoNotEmbedSystemFonts=True
    ActiveDocument.DoNotEmbedSystemFonts = True
    End Sub



    Author Comment

    Great! It worked. Should have guessed myself before posting here. Anyways you get your points. Thanks.
    LVL 80

    Expert Comment

    If truth be known, I had never seen those settings. So I followed your directions while recording a macro (Tools...Macro...Record menu item). I then found the two statements that were doing something in the resulting code and placed them in a separate sub. After testing, I then posted my Comment. That's a lesson well worth knowing.

    Thanks for the grade!

    Write Comment

    Please enter a first name

    Please enter a last name

    We will never share this with anyone.

    Featured Post

    Threat Intelligence Starter Resources

    Integrating threat intelligence can be challenging, and not all companies are ready. These resources can help you build awareness and prepare for defense.

    Have you ever had the experience that you had to follow 10 steps over and over again every time when you need to nicely forward an important email to your manager? Fear no more! With the help of the Quick Steps feature in Outlook 2010, your old chor…
    Introduction Perhaps more familiar to developers who primarily use VBScript than to developers who tend to work only with Microsoft Office and Visual Basic for Applications (VBA), the Dictionary is a powerful and versatile class, and is useful …
    This video shows and describes the main difference between both orientations in Microsoft Word. Viewers will understand when to use each orientation and how to get the most out of them.
    The viewer will learn how to create two correlated normally distributed random variables in Excel, use a normal distribution to simulate the return on different levels of investment in each of the two funds over a period of ten years, and, create a …

    760 members asked questions and received personalized solutions in the past 7 days.

    Join the community of 500,000 technology professionals and ask your questions.

    Join & Ask a Question

    Need Help in Real-Time?

    Connect with top rated Experts

    7 Experts available now in Live!

    Get 1:1 Help Now