用vba将excel的数据写入ppt的图表中,但运行一段时间后,会狂加载graph.exe,没办法释放
用vba将excel的数据写入ppt的图表中,但运行一段时间后,会狂加载graph.exe,没办法释放,到了一定数量,就报错不能执行,只能退出释放后才能再运行,有什么办法么?代码如下
Set dangqian = pptwendang.ActivePresentation.Slides(pslide).Shapes(pshape)
Set ograph = dangqian.OLEFormat.Object
ograph.Application.DataSheet.Rows.Clear
ograph.Application.DataSheet.Columns.Clear
For i = startx To shuzuR
For j = starty To shuzuC
ograph.Application.DataSheet.Cells(i, j) = shuzu1(i - startx + 1, j - starty + 1)
Next
Next
ograph.Application.Update
set ograph= nothing
set dangqian = nothing