파워포인트 VBA: 슬라이드 슬라이드쇼 설정하기

파워포인트 VBA: 슬라이드 슬라이드쇼 설정하기

파워포인트는 프레젠테이션 작성 및 편집을 위한 강력한 도구로 널리 사용되고 있습니다. 그러나 일반적으로 슬라이드쇼로 프레젠테이션을 실행할 때 수동으로 설정해야 하는 경우가 많습니다. 이러한 번거로움을 덜어주기 위해 파워포인트 VBA를 사용하여 슬라이드쇼 설정을 자동화할 수 있습니다.

VBA 개요

VBA(Visual Basic for Applications)는 마이크로소프트에서 개발한 프로그래밍 언어입니다. 파워포인트에는 VBA를 사용하여 프레젠테이션 작성 및 편집을 자동화하는 기능이 제공됩니다. VBA를 사용하면 파워포인트의 다양한 기능을 활용하고, 사용자 정의 슬라이드쇼 설정을 할 수 있습니다.

슬라이드쇼 설정

VBA를 사용하여 슬라이드쇼 설정을 자동화하려면 먼저 VBA 에디터를 열어야 합니다. VBA 에디터는 파워포인트의 개발 도구로, "개발자" 탭에서 "Visual Basic"을 클릭하여 열 수 있습니다.

VBA 에디터를 열었다면 다음 단계를 따라 슬라이드쇼 설정을 할 수 있습니다.

슬라이드쇼 시작 슬라이드 설정하기

슬라이드쇼를 시작할 슬라이드를 설정하려면 다음 코드를 VBA 에디터에 입력합니다.

Sub SetStartSlide()
    SlideShowSettings.StartingSlide = SlideShowWindow.View.Slide.SlideIndex
End Sub

위의 코드는 현재 보고 있는 슬라이드의 슬라이드 인덱스를 시작 슬라이드로 설정합니다. 슬라이드 인덱스는 슬라이드가 전체 슬라이드 중 몇 번째에 위치하는지를 나타냅니다. 코드를 입력한 후에는 실행하려면 F5 키를 누르거나 "실행" 메뉴에서 "실행"을 선택합니다.

슬라이드쇼 설정

슬라이드쇼의 옵션을 설정하려면 다음 코드를 VBA 에디터에 입력합니다.

Sub SetSlideShowOptions()
    With SlideShowSettings
        .ShowType = ppShowTypeKiosk
        .LoopUntilStopped = True
        .RangeType = ppShowAll
        .AdvanceMode = ppSlideShowUseSlideTimings
        .PointerColor.SchemeColor = ppDarkBlue
        .SlideShowName = "Custom Slideshow"
    End With
End Sub

위의 코드는 슬라이드쇼의 타입을 Kiosk 모드로 설정하고, 무한 반복, 모든 슬라이드 보기, 슬라이드 타이밍 사용, 포인터 색상을 다크 블루로 설정하여 "Custom Slideshow"라는 이름의 사용자 정의 슬라이드쇼를 만듭니다.

슬라이드쇼 실행

슬라이드쇼를 실행하려면 다음 코드를 VBA 에디터에 입력합니다.

Sub RunSlideShow()
    SlideShowWindows(1).View.SlideShowState = ppSlideShowRunning
End Sub

위의 코드는 첫 번째 슬라이드쇼 창을 선택하고, 슬라이드쇼를 실행합니다.

마무리

파워포인트 VBA를 사용하여 슬라이드쇼 설정을 자동화하는 방법을 알아보았습니다. VBA를 사용하면 반복적인 작업을 자동화하여 시간과 노력을 절약할 수 있습니다. 슬라이드쇼 설정 외에도 VBA를 사용하여 다양한 작업을 수행할 수 있으니, 파워포인트 사용자라면 VBA를 공부해보는 것이 좋습니다.