Fonts.Replace 方法 (PowerPoint)

将替换为 Fonts 集合中的字体。

语法

表达式。替换原始 (、替换)

表达一个代表 Fonts 对象的变量。

名称	必需/可选	数据类型	说明
Original	必需	String	要替换的字体的名称。
Replacement	必需	String	替换字体的名称。

本示例将当前演示文稿中的 Times New Roman 字体替换为 Courier 字体。

Application.ActivePresentation.Fonts _
    .Replace Original:="Times New Roman", Replacement:="Courier"

有关于 Office VBA 或本文档的疑问或反馈？请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。