共用方式為


(PowerPoint) 的 Application.Run 方法

執行 Visual Basic 程序。

語法

運算式執行 (MacroNamesafeArrayOfParams)

expression 代表 Application 物件的變數。

參數

名稱 必要/選用 資料類型 描述
MacroName 必要 String 要執行的程序名稱。 此字串可包含下列項目:後面接著驚嘆號 (!) 的已載入簡報或增益集檔案名稱、後面接著句點 (.) 的有效模組名稱以及程序名稱。 例如,下列是有效的 MacroName 值:「MyPres.pptm!Module1.Test.」
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 支援與意見反應