Deleting a progress bar from PowerPoint presentation [Solved/Closed]

Report
Posts
2
Registration date
Sunday December 9, 2012
Status
Member
Last seen
December 10, 2012
-
Posts
2
Registration date
Sunday December 9, 2012
Status
Member
Last seen
December 10, 2012
-
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 replies

Posts
2398
Registration date
Sunday September 23, 2012
Status
Moderator
Last seen
December 13, 2018
523
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.
Posts
2
Registration date
Sunday December 9, 2012
Status
Member
Last seen
December 10, 2012

Hi Zohaib,

It worked! Thanks for your help!

Regards,
Eric