如何把PPT所有公式颜色一次性改变

 用的是公式编辑器编辑的公式。 
google了一圈，没有满意的答案。因为公式较多，一个一个手工改工作量巨大。 
多谢！

3楼：

我知道如何批量修改文档中全部公式的大小的方法，修改颜色没试过，不知道行不行，你可以尝试一下。 
  
1、双击文档中任意一个公式，把这个公式修改成你需要的格式，如修改大小为12，或者10， 等等。 
2、选中这个公式，在打开的这个公式的工具栏上，点击preference, 然后把这个公式的style 存成一个eqp 文档，最好重命名一下，比如 size_10.eqp 等等 
3、在word工具栏上的mathtype这一栏中，在format 子类下，有一个'format equations', 点击这个，然后选中你刚刚保存的preference 文档，然后在下面的range 中选择whole document。 然后就可以了。。 
  
!!注意，如果公式较多的话，需要较长的时间，请耐心等待，并且请提前备份好源文档。

4楼：

多谢，可是我安装的mathtype6.7a里面没有看到format equation这个选项。 
  
不过我在网上找到一个人写的一个宏，还挺有效的，虽然只是改变一下颜色，而且只是 
黑白，但解决了我的问题。 
  
Sub EquationColor() 
  
  
Dim oSld As Slide 
  
Dim oShp As Shape 
  
Dim oShapes As Shapes 
  
Dim textColor As RGBColor 
  
  
For Each oSld In ActivePresentation.Slides 
  
     Set oShapes = oSld.Shapes 
  
     For Each oShp In oShapes 
  
         
  
         If oShp.Type = 7 Then 
  
          
  
             oShp.PictureFormat.ColorType = msoPictureBlackAndWhite 
  
             oShp.PictureFormat.Brightness = 0 
  
             oShp.PictureFormat.Contrast = 1 
  
             oShp.Fill.Visible = msoFalse 
  
              
  
         End If 
  
      
  
     Next oShp 
  
Next oSld 
  
End Sub 

以上转自：http://www.newsmth.net/nForum/#!article/NewSoftware/57571

=========================================分割线============================================

PPT批量修改公式文本颜色 

打开视图→模板，删去ppt底色。 回到普通视图模式，打开工具→宏→宏，在宏名处随便写几个字母，点击创建。 将自动生成语句全部删除，替换成如下程序，保存后关闭。 再打开打开工具→宏→宏，宏名处为Recolor，点击运行后保存。（若未出现运行选项，打开工具→宏→安全性，设置为中，重新打开文档） 再次打印预览时可见公式。实现代码如下：

Sub EquationColor()
Dim oSld As Slide
Dim oShp As Shape
Dim oShapes As Shapes
Dim textColor As RGBColor
For Each oSld In ActivePresentation.Slides
    Set oShapes = oSld.Shapes
    For Each oShp In oShapes
        If oShp.Type = 7 Then
            oShp.PictureFormat.ColorType = msoPictureBlackAndWhite
            oShp.PictureFormat.Brightness = 0
            oShp.PictureFormat.Contrast = 1
            oShp.Fill.Visible = msoFalse
        End If
    Next oShp
Next oSld
End Sub

以上转自：http://blog.chinaunix.net/uid-25652313-id-3538404.html