Office
PowerPoint 분류

파워포인트에서 진행률바 자동으로 만들어 추가하는 매크로

작성자 정보

  • HKEBI 작성
  • 작성일

컨텐츠 정보

본문

파워포인트에서 진행률 바를 자동으로 만들어서 추가하는 매크로 입니다. 

슬라이드별로 현재 슬라이드가 전체 슬라이드 대비 어느정도쯤인지 자동으로 만들어서 생성을 해줍니다. 

꾀 유용한데 코드도 간단해서 쉽게 사용할수 있는거 같아요. 

 

20210225-Capture-Image-006.png

 

On Error Resume Next
With ActivePresentation
For X = 1 To .Slides.Count
.Slides(X).Shapes("PB").Delete
Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, _
0, .PageSetup.SlideHeight - 12, _
X * .PageSetup.SlideWidth / .Slides.Count, 12)
s.Fill.ForeColor.RGB = RGB(127, 0, 0)
s.Name = "PB"
Next X:
End With

관련자료

댓글 0
등록된 댓글이 없습니다.

공지글


동영상


최근글


새댓글


포인트 랭킹


COUNT


오늘
108
어제
160
최대
234
전체
51,373