如何使用vba在PowerPoint中查找图表（图形）？

Question

我只想让代码或属性在使用宏（vba）的powerpoint silde中查找图表。

感谢

Answer 1

一个办法，找出图表

Sub EachSlides() 
'developer by Bruno Leite 
'http://officevb.com 
Dim sld As Slide 
Dim i As Integer 

    For Each sld In ActivePresentation.Slides 
      For i = 1 To sld.Shapes.Placeholders.Count 
         'select the placeholder 
         sld.Shapes.Placeholders(i).Select msoCTrue 
      Next i 
    Next sld 

End Sub