请问大家，如何用AddOLEObject在PPT中插入一个16列的表格，谢谢。

user_prtxrhvj

正在delphi中用VBA写控制PPT的程序，现在有一个问题，如何用AddOLEObject在PPT中插入一个16列的表格。发现一个规律，如果想插入8列的表格，就可以用如下代码：shpWorkSheet := oSlide.Shapes.AddOLEObject(10, 130, 55 * 8, 60, 'Excel.Sheet.8', '', msoFalse, '', 0, '', msoFalse);10例就用：shpWorkSheet := oSlide.Shapes.AddOLEObject(10, 130, 55 * 10, 60, 'Excel.Sheet.8', '', msoFalse, '', 0, '', msoFalse);也就是说，参数中Width能确定表格的列数，但好像最多是14列，就算宽度参数设2000也还是14列，有没有办法解决插入14列以上的表格呢？

user_pkifs

这个我不太清楚
不过我觉得列数太多,演示效果肯定不会好的.