This is an old revision of the document!


Microsoft Office

PowerPoint

  • VBA to change font to Headings or Body font:
    • {object}.Font.Name = "+" + FontType + "-" + FontLang
      • FontType is "mj" or "mn" for Major (headings) or Minor (body) respectively.
      • FontLang is "lt", "cs" or "ea" for Latin, Complex Scripts or East Asian
    • For example to set the font to the theme's body text font for Latin text: ActivePresentation.Slides(1).Shapes(1).TextFrame.TextRange.Font.Name = "+mn-lt"