PPT中用VB编辑表格

我想在PPT中用VB编辑一个表格，表格中的内容是读取的Excel中的数据，大致程序如何编写，主要的调用Excel及其中的sheet等语句如何编辑 Excel VB --------------------编程问答--------------------

'参考下面代码

Set app_excel = New Excel.Application

app_excel.Workbooks.Open filename:=filename

s=app_excel.activewokbook.sheets("sheet1").cells(1,1) '访问sheet1工作表中A1单元格

app_excel.quit

set app_excel=nothing

--------------------编程问答--------------------

引用 1 楼 dong_y888 的回复:

'参考下面代码

Set app_excel = New Excel.Application

app_excel.Workbooks.Open filename:=filename

s=app_excel.activewokbook.sheets("sheet1").cells(1,1) '访问sheet1工作表中A1单元格

app_excel.quit

set app_excel=nothing

我是用的PPT中的VB编辑器，如你所写，Set app_excel = New Excel.Application，但是无法引用Excel，是不是缺少Office控件还是怎么回事，我电脑上有Excel --------------------编程问答-------------------- 从“工具”菜单中选择“引用”命令。
--------------------编程问答--------------------

引用 3 楼 dong_y888 的回复:

从“工具”菜单中选择“引用”命令。

你说的是用VB软件吧？我用的事PPT中的VB编辑器，工具中没有引用这个选项 --------------------编程问答-------------------- 我用的是OFFICE2003，如果没有“引用”命令，这样改一下代码：
Set app_excel = New Excel.Application
换成下面的（前提是你的电脑上安装EXCEL）
Set app_excel = CeateObject("Excel.Application") --------------------编程问答-------------------- 4楼的，在引用中可以添加这个啊

补充：VB ,  控件