파워 포인트 vba에서 진행률 표시 줄을 만드는 방법은 무엇입니까?

Question

PowerPoint VBA로 진행률 표시 줄을 만들려면 어떻게해야합니까? 그것은 슬라이드에서 애니메이션으로 이루어져야합니다.

Answer 1

이게 당신이 찾고 있는게 있니?

http://www.pptfaq.com/FAQ00597.htm

Answer 2

이 하나가 상단에 막대를 넣어합니다 (pptfaq 스크립트와는 달리) 첫 번째 슬라이드에 나타나는 것을 방지합니다

http://www.faronics.com/news/blog/how-to-add-a-progress-bar-to-powerpoint/

파워 포인트에서

1. , 도구> 매크로> Visual Basic 편집기로 이동하십시오.

2. Office 2010에서 편집기를 활성화해야 편집기가 이됩니다. Mac 버전은 Developer 탭> 편집기를 통해 개발자에게 연결됩니다.

3. 편집기에 들어가면 삽입> 모듈로 이동하십시오.

4 가지입니다. 새로 만든 모듈에 다음 코드를 붙여 넣습니다.

Sub Presentation_Progress_Marker() 
On Error Resume Next 
With ActivePresentation 
For N = 2 To .Slides.Count 
.Slides(N).Shapes(“Progress_Marker”).Delete 
Set s = .Slides(N).Shapes.AddShape(msoShapeRectangle, 0, 0, N * .PageSetup.SlideWidth /.Slides.Count, 10) 
Call s.Fill.Solid 
s.Fill.ForeColor.RGB = RGB(23, 55, 94) 
s.Line.Visible = False 
s.Name = “Progress_Marker” Next N: End With End Sub 

5 개. 편집기를 닫으십시오. 마지막으로 매크로> 도구> 매크로> 매크로를 실행하고 select-Presentation_Progress_Marker를 실행합니다.