2010-12-10 2 views

Antwort

1
PowerPoint.SlideShowWindow.Presentation.SlideShowWindow.View.CurrentShowPosition 
0

Präsentation pres = Globals.ThisAddIn.Application.ActivePresentation;

 foreach (Slide s in pres.Slides) 
     { 

      MessageBox.Show(s.SlideIndex); 
     } 

Der Slide Titel Ich weiß nicht, noch

0

Capture-Ereignis SlideShowNextSlide und von den Wn Variable, erhält die Index/Titel Folie. Hier ist ein VBA-Beispiel:

Private Sub app_SlideShowNextSlide(ByVal Wn As SlideShowWindow) 
Dim s As Slide 
s = Wn.View.Slide 
Dim slideTitle As String 


If s.Layout <> ppLayoutBlank Then 
    If s.Shapes.HasTitle Then 
     slideTitle = s.Shapes.Title 
    Else 
     slideTitle = "(nothing)" 
    End If 
End If 

Dim sIndex As Integer 
sIndex = s.SlideIndex 

End Sub