提取.PPT幻灯片信息

Question

如果我有我想提取信息出来的.ppt幻灯片，我设置了为通过了该组织被不同的人，这些所有的幻灯片模板，我知道所有的“名”，以每个文本框对象，

我可以使用一些VB拉该信息从.ppt幻灯片成访问数据库？

我知道如何利用访问的形式，并创建以同样的方式输入的信息PPT演示，只是逆过程。所以我猜想，如果我设置这些PPT幻灯片，并将其命名所有的文本框什么，我想他们的名字，我应该能够做到这一点相反的方向，对吧？

Answer 1

是的，你可以做反向，并获得阅读PowerPoint幻灯片。我创建了一个PowerPoint 2007演示文稿与两个幻灯片，标题幻灯片和内容幻灯片。内空Access 2007年分贝，我添加了下面的测试代码模块。您还需要一个refrenence添加到在Access VBA项目的PowerPoint对象。

Public Sub ImportPowerPoint()
    Dim app As PowerPoint.Application
    Dim pres As PowerPoint.Presentation
    Dim ps As PowerPoint.Presentations
    Set app = New PowerPoint.Application
    app.Activate
    Set pres = app.Presentations.Open("C:\Temp\title slide.pptx")
    Debug.Print pres.Slides(1).Shapes(1).Name & " " & pres.Slides(1).Shapes(1).TextEffect.Text
    Debug.Print pres.Slides(1).Shapes(2).Name & " " & pres.Slides(1).Shapes(2).TextEffect.Text
    Debug.Print pres.Slides(2).Shapes(1).Name & " " & pres.Slides(2).Shapes(1).TextEffect.Text
    Debug.Print pres.Slides(2).Shapes(2).Name & " " & pres.Slides(2).Shapes(2).TextEffect.Text
End Sub

，你是包含关联到形状对象TextEffect对象内部后的文本。

希望这有助于（抱歉，我没有办公室2003，但应该很相似）