Question

我有6张幻灯片的演示文稿。幻灯片5包含用于旋转图，更改角度等的vba /宏代码。这些代码通过'vba编辑器'RUN'在活动文档中很好地工作。（。ppt）但是当放入'幻灯片'时模式代码不起作用.Dbug msg ： “非法请求。没有活动文档“。帮助代码。

Sub MoveItInSlideShow()
  With SlideShowWindows(1).Presentation.Slides(5).Shapes("Picture 2")
      ActiveWindow.Selection.SlideRange.Shapes("Picture 2").Select
      Application.Run "'Hora.ppt'!Slide7.CreateSpirograph"

  end with
end sub

由于

Answer 1

此行是不必要的，因为您已经在With语句中设置了对形状的引用：

ActiveWindow.Selection.SlideRange.Shapes("Picture 2").Select

但由于您无法在幻灯片显示视图中选择任何内容，因此任何尝试选择任何内容都会导致错误，这可能是您所看到的错误。

如果此处的代码需要选定的形状，您需要重写它：

Hora.ppt'!Slide7.CreateSpirograph

vba代码在“正常”视图中运行良好，但在powerpoint 2003中的“幻灯片放映”中不起作用

1 个答案: