PowerPoint 프레젠테이션 중에 화면 브러시 시작을 프로그래밍 방식으로 구현할 수 있습니다. 아래에서는 VBA(Visual Basic for Application)를 사용하여 PowerPoint 슬라이드 쇼 중에 브러시 기능을 제어하는 코드를 작성하는 구현 방법을 제공합니다.
먼저 PowerPoint를 열고 ALT + F11 키 조합을 눌러 Visual Basic 편집기를 엽니다. 왼쪽 프로젝트 창에서 PowerPoint 파일을 찾아 확장한 후 "ThisPresentation"을 두 번 클릭하고 오른쪽 코드 창에 다음 코드를 입력합니다.
Option Explicit
Private Sub App_SlideShowBegin(ByVal Wn As SlideShowWindow)
' 在放映开始时启动屏幕画笔
Wn.View.PointerType = ppSlideShowPointerPen
End Sub
Private Sub App_SlideShowEnd(ByVal Wn As SlideShowWindow)
' 在放映结束时关闭屏幕画笔
Wn.View.PointerType = ppSlideShowPointerArrow
End Sub
위 코드에서는 App_SlideShowBegin
쇼가 시작될 때 이벤트가 발생하는데, 이 이벤트에서 스크린 브러시 유형을 로 설정하여 ppSlideShowPointerPen
브러시를 시작하겠습니다. 이 이벤트는 쇼가 끝날 때 발생하며, 이 이벤트에서는 브러시를 끄기 위해 App_SlideShowEnd
화면 브러시 유형을 설정합니다 .ppSlideShowPointerArrow
다음으로 Visual Basic Editor를 저장하고 닫을 수 있습니다.