powerpoint中vba如何读取给定excel文档中的数据？

[40岁的程序员]

如题。
另一个问题是如何在指定位置(纵横像素点)输出文字？我现在的作法是动态生成一个label控件，不过觉得方法不对。如果能直接输出文字就好了。

[line_us]

OFFICE应用之间有动态链接

[evilboy_huang]

在应用程序间交叉运作

Visual Basic 可以从很多的 Microsoft 应用程序中创建新的对象以及检索已存在的对象。其它的应用程序也可能提供用于创建 Visual Basic 的对象。详细信息，请参阅应用程序文档。

若要创建新的对象或是从其它应用程序中获取已存在的对象，可以使用 CreateObject 函数或是 GetObject 函数：

'启动 Microsoft Excel 和创建新的 Worksheet 对象。
Set ExcelWorksheet = CreateObject("Excel.Sheet")

'启动 Microsoft Excel 和打开一个存在的 Worksheet 对象。
Set ExcelWorksheet = GetObject("SHEET1.XLS")

'启动 Microsoft Word。
Set WordBasic = CreateObject("Word.Basic")

大多数的应用程序会提供 Exit 或 Quit 方法来关闭应用程序，而不必管它是否为可见的。关于应用程序所提供的对象、方法、属性的详细信息，请参阅应用程序文档。

某些应用程序允许使用 New 关键字来创建一个存在于类型库中的类的对象。例如：

Dim X As New Field

在此事例中，Field 是一个在数据访问类型库中类的示例。使用该语法创建一个 Field 对象的新实例。关于用该方法创建对象类的详细信息，请参阅应用程序的文档。