.ppt 슬라이드에서 정보 추출

Question

내가있는 경우 .ppt 정보를 추출하려는 슬라이드와 조직을 통해 다양한 사람들이 사용하는 모든 슬라이드에 대한 템플릿을 설정했으며 각 텍스트 상자 개체에 대한 모든 "이름"을 알고 있습니다.

VB를 사용하여 해당 정보를 .ppt 액세스 데이터베이스로 슬라이드?

나는 액세스 양식을 취하고 동일한 방식으로 입력 한 정보로 PPT 프레젠테이션을 만드는 방법을 알고 있습니다. 그래서 나는이 PPT 슬라이드를 설정하고 모든 텍스트 상자의 이름을 지정하고 싶은 것을 이름을 지정하고있는 것을 반대 방향으로 할 수 있어야한다고 가정합니다.

Answer 1

예, 리버스를 수행하고 Access에서 PowerPoint 슬라이드를 읽을 수 있습니다. 두 개의 슬라이드, 제목 슬라이드 및 컨텐츠 슬라이드가있는 PowerPoint 2007 프레젠테이션을 만들었습니다. 빈 액세스 2007 DB에서 다음 테스트와 함께 코드 모듈을 추가했습니다. 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은 없었지만 매우 비슷해야합니다)