如何在PowerPoint中找到当前的编辑幻灯片?

mj2*_*008 3 delphi powerpoint

我正在为PowerPoint编写一个加载项,并希望从编辑窗口中的当前幻灯片中获取文本.以下情况有效,但仅在幻灯片选择器窗格中选择了幻灯片时才有效.

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

我一直在MSDN上追逐我的尾巴试图找出找出当前幻灯片的正确方法.DocumentWindow似乎没有当前的幻灯片.

Sha*_*ziz 8

你看过了吗?

ActiveWindow.View.Slide.SlideIndex

此链接很有用http://support.microsoft.com/kb/163194