본문 바로가기
■ 칼퇴를 위한 VBA : 사례/- VBA for 파워포인트

파워포인트 VBA: 슬라이드 레이아웃 변경하기

by 포탈메이커 2023. 7. 1.

파워포인트 VBA: 슬라이드 레이아웃 변경하기

파워포인트(VBA)를 사용하면 프레젠테이션 작업을 자동화하고 더 효율적으로 수행할 수 있습니다. 이번 포스팅에서는 파워포인트 VBA를 사용하여 슬라이드 레이아웃을 변경하는 방법을 알아보겠습니다.

1. VBA 에디터 열기

파워포인트를 실행시킨 후, 개발 탭에서 Visual Basic을 클릭하여 VBA 에디터를 엽니다.

2. 슬라이드 레이아웃 확인하기

작업할 프레젠테이션 파일을 열고, VBA 에디터에서 왼쪽 탐색창의 프로젝트 창에서 해당 프레젠테이션 파일을 선택합니다. 파일이 선택되면 오른쪽 탐색창에 해당 파일에 포함된 개체들이 표시됩니다. 여기서 슬라이드를 클릭하여 슬라이드 레이아웃을 확인할 수 있습니다.

3. 슬라이드 레이아웃 변경하기

VBA 에디터에서 프로젝트 창에서 해당 프레젠테이션 파일을 선택한 상태에서 삽입 메뉴를 클릭하고 모듈을 선택합니다. 그런 다음, 모듈에 아래의 코드를 입력합니다.

Sub ChangeSlideLayout()
    ' 슬라이드 개수 확인
    slideCount = ActivePresentation.Slides.Count

    ' 슬라이드 레이아웃 변경
    For i = 1 To slideCount
        ActivePresentation.Slides(i).Layout = ppLayoutTitleOnly ' 변경하고자 하는 레이아웃 선택
    Next i
End Sub

위의 코드에서 ppLayoutTitleOnly는 변경하고자 하는 레이아웃으로, 원하는 레이아웃으로 수정하여 사용할 수 있습니다. 다른 레이아웃으로 변경하고 싶은 경우, 아래의 코드에서 해당하는 레이아웃 상수를 찾아 수정해주면 됩니다.

 ppLayoutTitleOnly ' 제목만 있는 슬라이드 
 ppLayoutTitle ' 제목이 있는 슬라이드 
 ppLayoutText ' 제목과 텍스트가 있는 슬라이드 
 ppLayoutTwoColumnText ' 두 개의 컬럼으로 나누어진 텍스트 슬라이드 
 ppLayoutChart ' 차트가 있는 슬라이드 ppLayoutTable ' 표가 있는 슬라이드 ...

이렇게 코드를 수정한 후, VBA 에디터에서 디버그 탭을 클릭한 후, 컴파일 VBA 프로젝트를 선택하여 코드를 컴파일합니다. 컴파일이 완료되면 이제 슬라이드 레이아웃을 변경할 준비가 끝났습니다.

4. 슬라이드 레이아웃 변경 실행

프레젠테이션 파일이 열려있는 상태에서 개발 탭에서 매크로를 클릭합니다. 매크로 창이 열리면 변경하고자 하는 슬라이드들을 선택한 후, 찾아보기를 클릭하여 이전에 작성한 VBA 코드를 선택합니다. 그런 다음, 실행 버튼을 클릭하여 슬라이드 레이아웃을 변경합니다.

5. 결과 확인

VBA 코드 실행 후, 슬라이드 레이아웃이 변경되었는지 확인해보세요. 변경된 슬라이드들의 레이아웃에 맞게 제목, 텍스트 등을 수정하면 됩니다.

이렇게 파워포인트 VBA를 사용하여 슬라이드 레이아웃을 변경하는 방법을 알아보았습니다. VBA를 활용하면 파워포인트 작업을 자동화하고 시간을 절약할 수 있습니다. 다양한 VBA 코드를 배우고 활용하여 더 효율적인 프레젠테이션 작업을 향상시켜보세요!