Excel VBA의 내장 된 파워 포인트 편집

Question

Excel 통합 문서에 포함 된 PowerPoint 프레젠테이션이 포함되어 있습니다. VBA를 사용하여 이것 (열기, 슬라이드, 슬라이드에 데이터 추가, 슬라이드에 데이터 추가)을 어떻게 편집 할 수 있습니까?

Answer 1

1. VBA 응용 프로그램에 PowerPoint 객체 모델에 대한 참조 추가

VBA 창에서 선택하십시오 도구 | 참조
찾다 Microsoft PowerPoint 12.0 객체 라이브러리 그리고 그것을 확인하십시오

2. PowerPoint 프리젠 테이션 객체를 선택하고 활성화합니다

ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=xlOpen

참고 :이 코드는 PowerPoint 객체의 이름이 지정되었다고 가정합니다. 물체 1 (왼쪽 상단 코너를보고 실제로 이름이 무엇인지 확인하십시오) 활성 시트에 있습니다.

3. 프리젠 테이션 개체에 대한 참조를 얻습니다

Dim p As PowerPoint.Presentation
Set p = Selection.Object

4. 그것을 조작하십시오

프리젠 테이션 개체의 모든 방법과 속성을 사용할 수 있습니다. 슬라이드 추가의 예는 다음과 같습니다.

p.Slides.Add 1, ppLayoutBlank

5. 그것을 선택 해제하십시오

가장 쉬운 방법은 셀을 선택하는 것입니다.

[a1].Select

도움이되기를 바랍니다!