Question

全部显示

应用于SlideShowSettings 对象的 Run 方法。

运行指定演示文稿的幻灯片放映。返回一个SlideShowWindow 对象。

expression.Run

expression必选。该表达式返回上述对象之一。

说明

若要运行自定义幻灯片放映，请将RangeType 属性设为ppShowNamedSlideShow，并将SlideShowName 属性设为要运行的自定义放映的名称。

应用于Application 对象的 Run 方法。

运行 Visual Basic 过程。

expression.Run(MacroName,safeArrayOfParams)

expression必选。该表达式返回上述对象之一。

MacroName必选。String 类型。要运行的过程名称。该字符串可包含下列内容：后跟感叹号（!）的加载演示文稿或加载宏文件名、后跟句号的有效模块名称以及过程名称。例如，字符串“MyPres.ppt!Module1.Test”是一个有效MacroName 值。

safeArrayOfParams必选。Variant 类型。传递给该过程的参数。不能为此参数指定对象，也不能使用该方法的命名参数。参数必须通过地址传递。

示例

应用于 SlideShowSettings 对象。

本示例开始播放当前演示文稿的一个全屏幻灯片放映，并禁用快捷键。

With ActivePresentation.SlideShowSettings
 .ShowType = ppShowSpeaker
 .Run.View.AcceleratorsEnabled = False
End With

本示例运行名为“Quick Show”的幻灯片放映。

With ActivePresentation.SlideShowSettings
 .RangeType = ppShowNamedSlideShow
 .SlideShowName = "Quick Show"
 .Run
End With

应用于 Application 对象。

在本示例中，Main 过程定义一个数组，然后执行宏 TestPass，将该数组作为参数传递。

Sub Main()
 Dim x(1 To 2)
 x(1) = "hi"
 x(2) = 7
 Application.Run "TestPass", x
End Sub

Sub TestPass(x)
 MsgBox x(1)
 MsgBox x(2)
End Sub