各位大师好，VB6.0如何操作ppt2007默认的图表呢？望给个提示，谢谢

2007应该是12

Sample:

Sub Macro2()
ActiveWindow.Selection.SlideRange.Shapes.AddOLEObject(Left:=120, Top:=110, Width:=480, Height:=320, ClassName:="MSGraph.Chart", Link:=msoFalse).Select
    ActiveWindow.Selection.ShapeRange.OLEFormat.Activate
    With ActiveWindow.Selection.ShapeRange
        .Left = 120
        .Top = 109.875
        .Width = 480
        .Height = 320.25
    End With
End Sub

ActiveWindow要改成VB6的对象

感谢【wube】，ppt2007默认的图表不是OLE对象。是直接通过EXCEL2007打开的。我下面的代码在ppt2003中是可以正常使用的，换成ppt2007就报错，如下图
Dim oGraph As Object
Set oGraph=PowerPoint.Presentation.Slides ("Slide1").Shapes("Chart1").OLEFormat.object

意思是ppt2007图表不是OLE对象，好像要调用其他形式

我是拿2003来录的源码～我没装2007你不能照抄～
应该2007也能录～录完去编辑器看源码～
再改对象名称～这样还不行吗？

2003和2007的宏绝对不一样～我以前有使用VB6编生成Excel2007的档案的程式码～
当我改成2003后～还是能用～但是会有一大堆错误～可见得宏的使用方法绝对不一样～

ppt2007把录制宏给去掉了。
这么长时间没有找到答案，先结贴了，谢谢各位。

那只好按部就班了～
死命查MSDN～

或参考别人写好的宏～
只用过Excel2007～
不知道PPT移除了～