Current Slide Index while in slide show

[Christoph Quix]

Hi!

I want to insert a new blank slide after the current slide
while I am in a slide show, i.e. exactly the same that ctrl-m does
while in editing mode. Background is that I am using
a Tablet PC for the presentation, and I might want to write
some notes on additional blank slides.

I have figured out, that there is no direct operation
that supports this, and that I have to use an interactive
button linked to a macro to do the job.

I know that there is the Slides.Add method, but this
expects a slide index as first parameter. So I need to
find the index of the current slide, add 1, and use this
as a parameter for this method.

So far, all my tries failed. I had a macro which works fine
in normal editing mode, but it fails in the slide show mode.
The objects seems to be different.

Has anybody an idea?

Christoph

 

[Michael Koerner]

To insert slides you have to be in the Edit mode, not the Slideshow mode.

--
<>Please post all follow-up questions/replies to the newsgroup<>
<><>Email unless specifically requested will not be opened<><>
<><><>Do Provide The Version Of PowerPoint You Are Using<><><>
<><><>Do Not Post Attachments In This Newsgroup<><><>
Michael Koerner [MS PPT MVP]


Hi!

I want to insert a new blank slide after the current slide
while I am in a slide show, i.e. exactly the same that ctrl-m does
while in editing mode. Background is that I am using
a Tablet PC for the presentation, and I might want to write
some notes on additional blank slides.

I have figured out, that there is no direct operation
that supports this, and that I have to use an interactive
button linked to a macro to do the job.

I know that there is the Slides.Add method, but this
expects a slide index as first parameter. So I need to
find the index of the current slide, add 1, and use this
as a parameter for this method.

So far, all my tries failed. I had a macro which works fine
in normal editing mode, but it fails in the slide show mode.
The objects seems to be different.

Has anybody an idea?

Christoph

 

[David M. Marcovitz]

ActivePresentation.SlideShowWindow.View.Slide.SlideIndex

will get you the current slide's SlideIndex. I think that is just what
you want.

--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/

 

[David M. Marcovitz]

To insert slides you have to be in the Edit mode, not the Slideshow mode.

Unless you use VBA, that is.
--David

--
David M. Marcovitz
Microsoft PowerPoint MVP
Director of Graduate Programs in Educational Technology
Loyola College in Maryland
Author of _Powerful PowerPoint for Educators_
http://www.loyola.edu/education/PowerfulPowerPoint/

 

[Christoph Quix]

I think, that was one of the things I tried.
Anyway, my current solution uses SlideShowWindows(1).View.CurrentShowPosition
and it works.

SlideShowWindows(1).View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=(SlideShowWindows(1).View.CurrentShowPosition + 1), Layout:=ppLayoutBlank).SlideIndex
SlideShowWindows(1).View.PointerType = ppSlideShowPointerPen

Thanks,
Christoph