Метод Application. Run (PowerPoint)Application.Run method (PowerPoint)

Запускает процедуру Visual Basic.Runs a Visual Basic procedure.

СинтаксисSyntax

Expression. Запуск (Имя_макроса, сафеаррайофпарамс)expression.Run (MacroName, safeArrayOfParams)

выражение: переменная, представляющая объект Application.expression A variable that represents an Application object.

ПараметрыParameters

ИмяName Обязательный или необязательныйRequired/Optional Тип данныхData type ОписаниеDescription
MacroNameMacroName ОбязательныйRequired StringString Имя выполняемой процедуры.The name of the procedure to be run. Строка может содержать следующее: загруженное имя файла представления или надстройки, за которым следует восклицательный знак (!), допустимое имя модуля, за которым следует точка (.) и имя процедуры.The string can contain the following: a loaded presentation or add-in file name followed by an exclamation point (!), a valid module name followed by a period (.), and the procedure name. Например, ниже приведено допустимое значение имяМакроса: "Мипрес. ppt! Module1. Test. "For example, the following is a valid MacroName value: "MyPres.ppt!Module1.Test."
Сафеаррайофпарамс ()safeArrayOfParams() ОбязательныйRequired VariantVariant Аргумент, передаваемый в процедуру.The argument to be passed to the procedure. Вы не можете указать объект для этого аргумента, и вы не можете использовать именованные аргументы с этим методом.You cannot specify an object for this argument, and you cannot use named arguments with this method. Аргументы должны передаваться по положению.Arguments must be passed by position.

Возвращаемое значениеReturn value

VariantVariant

ПримерExample

В этом примере процедура main определяет массив, а затем запускает макрос Тестпасс, передавая массив в качестве аргумента.In this example, the Main procedure defines an array and then runs the macro TestPass, passing the array as an argument.

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

См. такжеSee also

Объект ApplicationApplication Object

Поддержка и обратная связьSupport and feedback

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи?Have questions or feedback about Office VBA or this documentation? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.Please see Office VBA support and feedback for guidance about the ways you can receive support and provide feedback.