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

lohbecej 2 Posts Sunday December 9, 2012Registration date December 10, 2012 Last seen - Dec 9, 2012 at 09:06 PM - Latest reply: lohbecej 2 Posts Sunday December 9, 2012Registration date December 10, 2012 Last seen
- 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.

http://ccm.net/faq/937-insert-a-progress-bar-to-powerpoint-presentation

How do I get rid of it??



See more 

2 replies

Zohaib R 2420 Posts Sunday September 23, 2012Registration date July 12, 2018 Last seen - Dec 10, 2012 at 12:10 AM
0
Thank you
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.
lohbecej 2 Posts Sunday December 9, 2012Registration date December 10, 2012 Last seen - Dec 10, 2012 at 01:36 PM
0
Thank you
Hi Zohaib,

It worked! Thanks for your help!

Regards,
Eric