ppt怎么把字体加粗加黑

1.怎么将PPT中某种颜色的字全部加粗?

批量字体全加粗 首先，先看看PPT版本是否有选取相似的功能，我知道Word2007 word2010有选取相似功能，但ppt2007没有这个功能，不知道ppt2010是否有这个功能，如果有，就非常方便了。如果没有，目前好像除了下面的VBA方法外，没有其他方法可以实现这样的木雕。

现在用VBA编程的方式来实现，按Alt+F11打开VBA编辑窗口，将下面的代码原样复制粘贴进来，然后按F5运行即可。

Sub Rep()

For i = 1 To ActivePresentation.Slides.Count

For k = 1 To Application.ActivePresentation.Slides(i).Shapes.Count

For j = 1 To Len(Application.ActivePresentation.Slides(i).Shapes(k).TextFrame.TextRange.Text)

Application.ActivePresentation.Slides(i).Shapes(k).TextFrame.TextRange.Characters(Start:=j, Length:=1).Select

If ActiveWindow.Selection.TextRange.Font.Color.RGB <> RGB(Red:=255, Green:=0, Blue:=0) Then ActiveWindow.Selection.TextRange.Font.Bold = msoTrue

Next j

Next k

Next i

MsgBox "处理完毕！"

end sub

说明：RGB(Red:=255, Green:=0, Blue:=0) 代表幻灯片母版的字体颜色，如果母版字体的颜色为白色，则RGB(Red:=255, Green:=255, Blue:=255) ，如果为黑色，则RGB(Red:=0, Green:=0, Blue:=0) ，如果为黄色，则RGB(Red:=255, Green:=255, Blue:=0) ，表示凡是不与母版字体颜色一样的字体都被认为是颜色字体，对其进行加粗。如果母版字体颜色不是上述的红色、白色、黑色、黄色，而是其他颜色，则需要您自己指定颜色值，那么怎么知道母版字体的颜色值是多少呢，随便选择一个跟母版字体颜色一样的字，单击工具栏上“字体”工具图标，弹出的工具板中选择其他字体颜色-自定义，就可以看到下面中间栏的红、绿、蓝的颜色值了，将此值分别替换代码中RGB后面的相应值即可。

2.请老师帮忙如何一次性地将PPt里的字体改成黑色的

PPT我不擅长，但我可以用宏帮你一次搞定。同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码：

Sub test()

Dim i, j As Integer

For i = 1 To ActivePresentation.Slides.Count

For j = 1 To ActivePresentation.Slides(i).Shapes.Count

ActivePresentation.Slides(i).Shapes(j).TextFrame.TextRange.Font.Color = vbBlack

Next

Next

End Sub

在此界面直接按F5运行此宏，完成。