共用方式為


PowerPoint) Application.Run 方法 (

執行 Visual Basic 程序。

語法

表情執行MacroNamesafeArrayOfParams ()

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
MacroName 必要 String 要執行的程序名稱。 此字串可包含下列項目:後面接著驚嘆號 (!) 的已載入簡報或增益集檔案名稱、後面接著句點 (.) 的有效模組名稱以及程序名稱。 例如,以下是一個有效的巨集名稱值:「MyPres.pptm!模組1.測試。」
safeArrayOfParams () 選用 Variant 要傳遞至程序的引數。 你可以為這個論點指定一個物件。 此方法無法使用命名參數。 您必須按照位置傳遞引數。

傳回值

Variant

範例

在此範例中,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

在此範例中,活動視窗作為物件傳遞給 ShowSlideName 程序。

Sub Main()

    Application.Run "ShowSlideName", ActiveWindow.View.Slide

End Sub



Sub ShowSlideName(oSld As Slide)

    MsgBox oSld.Name

End Sub

在此範例中,多個參數會傳遞給 ShowData 程序。

Sub Main()

    Application.Run "ShowData", 100, "my text", True

End Sub



Sub ShowData(i As Integer, t As String, b As Boolean)

    Debug.Print i, t, b

End Sub

另請參閱

Application 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應