当前位置:首页经验技巧Ppt经验ppt实战

PowerPoint幻灯片怎样调所有的字体

2026-01-18 13:01:11

1.在线等

呵呵,只找到一种改变字体的:

格式->;替换字体,然后选你想要的字体。

这种方法只能改变所有ppt的字体,不能改变字号,颜色等。

其它可以查查vba。

获得每张ppt的所有文本框,设置它的字体。

你可以录制一个宏,具体是

ctr+a选中一页中的所有东西,然后改字体。最后结束录制。然后对每一页都做这个宏。

最好是写vba啦。

可以把上面两个结合起来用。

好了。现在搞定了。

你可以写一个宏,内容是这样:

Sub Macro1()

'

' 宏由 heno 记录,日期: 2006-4-29

'

Set mySlides = ActivePresentation.Slides.Range

iCount = mySlides.count

For i = 1 To iCount

DoEvents

ActiveWindow.View.GotoSlide Index:=i

iCunCount = ActiveWindow.Selection.SlideRange.Shapes.count

For j = 1 To iCunCount

ActiveWindow.Selection.SlideRange.Shapes(j).Select

iShapeType = ActiveWindow.Selection.SlideRange.Shapes(j).Type

'1--自选图形

'7---公式 、(图表、WORD表格、组织结构图等 OLE)

'17--文本框 19--表格 15--艺术字 14--占位符

'13---图片

' Debug.Print iShapeType

Select Case iShapeType

Case 1, 14, 17

Set tx = ActiveWindow.Selection.ShapeRange.TextFrame.TextRange

tx.Select

If tx.Text <> "" Then

With tx.Font

.Color.RGB = RGB(Red:=255, Green:=0, Blue:=102)

.Name = "Palatino"

End With

End If

Case 7, 13, 15 '图片、公式不处理

Case 19 '表格不处理

End Select

Next j

Next i

End Sub

其中,你只要把

With tx.Font

.Color.RGB = RGB(Red:=255, Green:=0, Blue:=102)

.Name = "Palatino"

End With

里的东西改成你想要的就行了。

具体font属性请参看vb中font的属性。

其中,宏的制作你可以先录制,后修改。

录制: 工具->;宏->;录制,其它就不说了.

呵呵……

2.WPS如何更改ppt全部字体

1.首先,在WPS2013打开需要转换的word文档,Ctrl+A 组合键全部选中文档内容,单击鼠标右键,在弹出的下拉框中选择“复制”命令,也可以按【Ctrl+C】组合键。

2.启动WPS2013 PowerPoint,单击鼠标左键“WPS演示”下拉三角形按钮,选择“文件”—“新建”命令。 3.选择菜单栏中的“视图”——“普通”选项。

4.单击“大纲”标签,将光标定位到第一张幻灯片处,单击鼠标右键选择“粘贴”命令(也可用Ctrl+V组合键),将word文档中的内容粘贴到第一张幻灯片中。 5.可根据需要对文本格式进行设置,包括字体、字号、颜色等设置。

6.将光标移动到需要划分为下一张幻灯片处,直接按“enter”键,即可创建一张新的幻灯片。调整之后,很快就可以完成多张幻灯片的制作。


免责声明:本站信息来自网络收集及网友投稿,仅供参考,如果有错误请反馈给我们更正,对文中内容的真实性和完整性本站不提供任何保证,不承但任何责任,谢谢您的合作。
版权所有:五学知识网 Copyright © 2015-2026 www.z8000w.com. All Rights Reserved .