請問關於VBA用於Powerpoint(編號：4338)

VBA在播放檔(.ppt)上是不是不能執行使用呀?請大家指點一下
程式如下,在PowerPoint環境下是可用的
Sub arrowup()
With Windows(1).Selection.SlideRange(1).Shapes(6)
.Top = .Top - 10
End With
End Sub