Application.Run-Methode (Word)

Artikel
04/07/2023

Führt ein Visual Basic-Makro aus.

Syntax

Ausdruck. Ausführen (MacroName, varg1, varg2, varg3, varg4, varg5, varg6, varg7, varg8, varg9, varg10, varg11, varg12, varg13, varg14, varg15, varg16, varg17, varg18, varg19, varg20, varg21, varg22, varg23, varg24, varg25, varg26, varg27, varg28, varg29, varg30)

Ausdruck: Erforderlich. Eine Variable, die ein Application -Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
MacroName	Erforderlich	String	Der Name des Makros.
varg1... varg30	Optional	Variant	Parameterwerte für Makros. Sie können an das angegebene Makro bis zu 30 Parameter übergeben.

HinwBemerkungeneise

Der Parameter MacroName kann aus einer beliebigen Kombination aus Vorlagen-, Modul- und Makronamen bestehen. So sind z. B. die folgenden Aussagen gültig.

Application.Run "Normal.Module1.MAIN" 
Application.Run "MyProject.MyModule.MyProcedure" 
Application.Run "'My Document.doc'!ThisModule.ThisProcedure"

Wenn Sie den Dokumentnamen angeben, kann Ihr Code makros nur in Dokumenten ausführen, die sich auf den aktuellen Kontext beziehen– nicht nur in jedem Beliebigen Makro.

Obwohl Visual Basic-Code ein Makro direkt aufrufen kann (ohne die Run-Methode zu verwenden), ist diese Methode nützlich, wenn der Makroname in einer Variablen gespeichert wird. (Weitere Informationen finden Sie im Beispiel für dieses Thema. Die folgenden drei Anweisungen sind funktional äquivalent. Die ersten beiden Anweisungen erfordern einen Verweis auf Normal.dot, das Projekt, in dem sich das aufgerufene Makro befindet. Die dritte Anweisung, die die Run-Methode verwendet, erfordert keinen Verweis auf das Projekt Normal.dot.

Normal.Module2.Macro1 
Call Normal.Module2.Macro1 
Application.Run MacroName:="Normal.Module2.Macro1"

Beispiel

In diesem Beispiel wird der Benutzer aufgefordert, die Namen einer Dokumentvorlage, eines Moduls, eines Makros und eines Parameterwerts einzugeben. Anschließend wird das Makro ausgeführt.

Dim strTemplate As String 
Dim strModule As String 
Dim strMacro As String 
Dim strParameter As String 
 
strTemplate = InputBox("Enter the template name") 
strModule = InputBox("Enter the module name") 
strMacro = InputBox("Enter the macro name") 
strParameter = InputBox("Enter a parameter value") 
Application.Run MacroName:=strTemplate & "." _ 
 & strModule & "." & strMacro, _ 
 varg1:=strParameter

Siehe auch

Application-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.