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

파워포인트 VBA: 슬라이드 노트 추가하기

by 포탈메이커 2023. 6. 30.

파워포인트 VBA: 슬라이드 노트 추가하기

파워포인트 VBA를 사용하면 슬라이드에 자동으로 노트를 추가할 수 있습니다. 이 기능은 프레젠테이션을 만들 때 매우 유용하며, 텍스트나 설명을 슬라이드와 함께 보여주고 싶을 때 효과적입니다. 이번 포스트에서는 파워포인트 VBA를 사용하여 슬라이드 노트를 추가하는 방법에 대해 알아보겠습니다.

1. VBA 에디터 열기

먼저, 파워포인트 파일을 열고 VBA 에디터를 엽니다. VBA 에디터는 "개발자" 탭에서 "Visual Basic"을 클릭하여 열 수 있습니다.

2. 코드 작성하기

VBA 에디터가 열리면 왼쪽 창에 "프로젝트 탐색기"가 나타납니다. 이곳에서 VBA 코드를 작성할 슬라이드를 선택합니다. 예를 들어, 1번 슬라이드에 노트를 추가하려면 "VBAProject" - "Microsoft PowerPoint 오브젝트" - "Slide1"을 선택합니다.

노트를 추가하기 위해 아래의 VBA 코드를 작성합니다.

Sub AddNoteToSlide()
    ActiveWindow.ViewType = ppViewNormal

    With ActiveWindow.Selection.SlideRange.NotesPage.Shapes
        ' 텍스트 박스 추가
        .AddTextbox msoTextOrientationHorizontal, 0, 0, 500, 400
        
        ' 텍스트 박스에 내용 입력
        .Item(.Count).TextFrame.TextRange.Text = "이곳에 노트를 입력하세요"
        
        ' 텍스트 폰트 크기 설정
        .Item(.Count).TextFrame.TextRange.Font.Size = 14
    End With
End Sub

이 코드는 현재 활성 창의 슬라이드에 노트를 추가하는 기능을 수행합니다. 추가된 노트의 크기와 텍스트는 코드에서 수정할 수 있습니다.

3. 코드 실행하기

코드 작성이 완료되면 VBA 에디터를 닫고, 슬라이드 쇼 모드로 전환합니다. "개발자" 탭에서 마우스 우클릭하여 "바로 가기 메뉴 추가"를 선택한 후 "슬라이드 쇼 보기"를 클릭합니다.

스크린에 아무 상관없이 추가된 노트가 표시될 것입니다. 만약 다른 슬라이드에 노트를 추가하고 싶다면, VBA 코드의 "NotesPage.Shapes" 부분을 수정하여 원하는 슬라이드의 노트 페이지에 접근할 수 있습니다.

마무리

이렇게 파워포인트 VBA를 사용하여 슬라이드에 노트를 추가할 수 있습니다. 이 기능은 프레젠테이션에 추가적인 정보나 설명을 제공하고 싶을 때 유용하게 사용할 수 있습니다. VBA를 사용하여 파워포인트를 자유롭게 제어할 수 있는 다른 기능도 존재하므로, VBA에 익숙해지면 파워포인트를 더욱 효율적으로 활용할 수 있습니다.