Lock Slide Numbers in Powerpoint 2007

Posted on 2013-10-08
Medium Priority
Last Modified: 2014-03-10
Is there a way to lock the slide numbers in a presentation such that I can insert slides and not affect the numbering of later slides?

At my company, we prepare presentations that will eventually become legal support for SEC reporting. The presentations are created in August and reviewed by an Audit Team. That team may have suggestions like: you need to add a slide after slide 82 that describes blah blah blah. They may also reference several slides after 82. If we insert a slide after 82, we'd like to number it something like "82A" so that all originally presented slides retain the numbering as presented in August. That way, all follow-up work by all parties, over several months, remains consistent: everyone continues to talk about the same slide numbers throughout the process.

So we'd like to lock the numbers, say slides 82, 83, 84, and 85 so that when we insert slide 82A, slides 83 to 85 remain slides 83 to 85.
Question by:joelhoffman
LVL 70

Expert Comment

ID: 39556053
In a word no - the slide numbers are dynamic
You can of course always manually number slides.
LVL 25

Expert Comment

ID: 39556063
There is really no way to do this other than to manually number each slide and then manually update it later. Which isn't a good solution, of course.

The only other way would be to do it via an add-in, but I don't think it would be an easy one to develop. It would basically be automating what you'd normally do manually. I believe you can't use PPT's page numbering at all in your scenario. So you'd have to have a button that numbers all slides -- that would add a textbox with the increasing number to each existing slide.  Then you'd have to have another button / option that lets you specify numbering sequence for any slides as you add them -- or maybe you'd have an option to add a set of numbers to selected slides. I think that part could get fairly complicated pretty quickly.

Author Comment

ID: 39556071
The manual numbering is definitely an option we'd thought of; however, manually numbering thousands of slides represents quite an effort ... just as bad as the confusion caused by one slide having multiple slide numbers over time. Maybe some VB code of some kind could help? I'll keep watching here for a while and see what others come up with, if anything. Thanks!
Get your problem seen by more experts

Be seen. Boost your question’s priority for more expert views and faster solutions

LVL 23

Accepted Solution

JSRWilson earned 2000 total points
ID: 39906948
One way would be to create special new custom layouts for the A B C slides. Duplicate the normal layout and rename them with names starting with e.g. NSNUM

This code should then number accordingly.
Sub renum()
Dim lngNum As Long
Dim osld As Slide
Dim SN As Shape
Dim lngCHAR As Long
On Error Resume Next
For Each osld In ActivePresentation.Slides

If Not UCase(osld.CustomLayout.Name) Like "NSNUM*" Then
lngCHAR = 65
lngNum = lngNum + 1
osld.HeadersFooters.SlideNumber.Visible = True
Set SN = getNum(osld)
If Not SN Is Nothing Then SN.TextFrame.TextRange = CStr(lngNum)
osld.HeadersFooters.SlideNumber.Visible = True
Set SN = getNum(osld)
If Not SN Is Nothing Then SN.TextFrame.TextRange = CStr(lngNum) & Chr(lngCHAR)
lngCHAR = lngCHAR + 1
End If
End Sub

Function getNum(osld As Slide) As Shape
For Each getNum In osld.Shapes
If getNum.Type = msoPlaceholder Then
If getNum.PlaceholderFormat.Type = ppPlaceholderSlideNumber Then Exit Function
End If
End Function

Open in new window


Author Comment

ID: 39917533
I was not aware of custom slide layouts - I'll check those out and try your solution and post back how it worked.

Author Closing Comment

ID: 39917574
Brilliant!! Worked like a charm! Thanks!

Featured Post

The 14th Annual Expert Award Winners

The results are in! Meet the top members of our 2017 Expert Awards. Congratulations to all who qualified!

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

I came across an unsolved Outlook issue and here is my solution.
In this article, I will demonstrate that how to do a PST migration from Exchange Server to Office 365. This method allows importing one single PST, or multiple PST's at once.
The viewer will learn how to create a normally distributed random variable in Excel, use a normal distribution to simulate the return on an investment over a period of years, Create a Monte Carlo simulation using a normal random variable, and calcul…
Have you created a query with information for a calendar? ... and then, abra-cadabra, the calendar is done?! I am going to show you how to make that happen. Visualize your data!  ... really see it To use the code to create a calendar from a q…

624 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question