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

Question

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

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

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

PowerPoint中是否有等价物？

ActivePresentation.Styles返回错误。

我使用对象浏览器搜索Style（希望找到明显/直观的东西），但有几十个结果，没有一个看起来特别有希望。希望其他人以前遇到过这种情况。

Answer 1

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

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

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