发布网友 发布时间:2022-02-20 00:59
共1个回答
热心网友 时间:2022-02-20 02:28
办法一:修改PPT模板,视图-母板-幻灯片母板,进入母板后,修改母板中的标题和文本格式,改完后,单击关闭母板视图,返回幻灯片,所有幻灯片中的字体格式就都改过来了。办法二:首先,将代码复制到记事本或word中,然后,打开你需要修改的PPT,然后创建宏,再运行宏,即可实现。代码如下:Sub OED01() '批量修改字体格式、大小和颜色Dim oShape As ShapeDim oSlide As SlideDim oTxtRange As TextRangeOn Error Resume NextFor Each oSlide In ActivePresentation.SlidesFor Each oShape In oSlide.ShapesSet oTxtRange = oShape.TextFrame.TextRangeIf Not IsNull(oTxtRange) ThenWith oTxtRange.Font.Name = 楷体_GB2312 '改成你需要的字体.Size = 20 '改成你需要的文字大小.Color.RGB = RGB(Red:=255, Green:=0, Blue:=0) '改成你想要的文字颜色End WithEnd IfNextNextEnd Sub