How to find current editing slide in PowerPoint?

Question

I am writing an add-on for PowerPoint and want to get text from the current slide in the editing window. The following actions are performed, but only when selecting a slide in the slide selector panel.

xSelection := PowerPointApp.ActiveWindow.Selection;
if xSelection.Type = ppSelectionSlides then
begin
  xSlide := xSelection.SlideRange.Item(1);
end;

I chased my tail on MSDN trying to figure out how to correctly find the current slide. DocumentWindow is missing the current slide.

Answer 1

You looked

ActiveWindow.View.Slide.SlideIndex

This link is useful http://support.microsoft.com/kb/163194