在PowerPoint中设置应用程序级字体大小

Question

在Excel中，我可以执行以下操作：

ActiveWorkbook.Styles("Normal").Font.Name = "Calibri"

这复制了导航到Home功能区并选择将使用的特定字体的操作，以避免在几十个地方以编程方式分配不同的字体。

PowerPoint中是否有相同的内容？

ActivePresentation.Styles会返回错误。

我使用对象浏览器并搜索Style（希望找到明显/直观的东西），但有几十个结果，它们都没有特别有希望。希望其他人在此之前参与其中。

Answer 1

通过一些试验和错误，这似乎可以解决问题：

With ActivePresentation
    .SlideMaster.Theme.ThemeFontScheme.MinorFont.Item(1).Name = "Calibri"
End With

还有一个.MajorFont但看起来.MinorFont就是我需要的。