Deleting a progress bar from PowerPoint presentation

Solved/Closed
lohbecej Posts 2 Registration date Sunday December 9, 2012 Status Member Last seen December 10, 2012 - Dec 9, 2012 at 09:06 PM
lohbecej Posts 2 Registration date Sunday December 9, 2012 Status Member Last seen December 10, 2012 - Dec 10, 2012 at 01:36 PM
Hello,

I used the following method to add a progress bar to my PowerPoint presentation - now I don't like it.

https://ccm.net/faq/937-insert-progress-bar-into-powerpoint-presentation

How do I get rid of it??



2 responses

Zohaib R Posts 2368 Registration date Sunday September 23, 2012 Status Member Last seen December 13, 2018 69
Dec 10, 2012 at 12:10 AM
Hi lohbecej,

To get rid of this progress bar make the following changes to the module:

Replace:

Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, _
0, .PageSetup.SlideHeight - 12, _
X * .PageSetup.SlideWidth / .Slides.Count, 12)

With:

Set s = .Slides(X).Shapes.AddShape(msoShapeRectangle, 0, 0, 0, 0)

Run the macro, the progress bar should not appear now.

Do reply with results.
0
lohbecej Posts 2 Registration date Sunday December 9, 2012 Status Member Last seen December 10, 2012
Dec 10, 2012 at 01:36 PM
Hi Zohaib,

It worked! Thanks for your help!

Regards,
Eric
0