Application.Evaluate-Methode (Excel)

Artikel
04/07/2023

Diese Methode konvertiert einen Microsoft Excel-Namen in ein Objekt oder in einen Wert.

Syntax

Ausdruck. Evaluate (Name)

expression Eine Variable, die ein Application-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Name	Erforderlich	Variant	Eine Formel oder der Name des Objekts, unter Verwendung der Namenskonvention von Microsoft Excel. Der Name darf nicht länger als 255 Zeichen sein.

Rückgabewert

Variant

Bemerkungen

Die folgenden Namenstypen sind in Microsoft Excel im Zusammenhang mit dieser Methode zulässig:

Formeln.
Verweise im A1-Stil. Verwenden Sie einen beliebigen Verweis auf eine einzelne Zelle in der A1-Schreibweise. Diese Bezüge sind immer absolute Bezüge.
Bereiche. Verwenden Sie die Operatoren range, intersect und union (Doppelpunkt, Leerzeichen und Komma) mit Verweisen.
Definierte Namen. Sie können jeden beliebigen Namen in der Sprache des Makros angeben.
Externe Verweise. Verwenden Sie den ! -Operator, um auf eine Zelle oder auf einen Namen zu verweisen, der in einer anderen Arbeitsmappe definiert ist, Evaluate("[BOOK1.XLS]Sheet1!A1")z. B. .
Diagrammobjekte. Sie können einen beliebigen Diagrammobjektnamen angeben, z. B. Legende, Zeichnungsfläche oder Datenreihe 1, um auf die Eigenschaften und Methoden dieses Objekts zuzugreifen. Gibt beispielsweise den Namen der schriftart zurück, Charts("Chart1").Evaluate("Legend").Font.Name die in der Legende verwendet wird.
Formularkontrollnummer. Sie können sowohl eine Zahl als auch einen Namen angeben, um auf das Formularsteuerelement auf einem Arbeitsblatt zu verweisen. Für Bezeichnung, die sich auf einem Arbeitsblatt befindet (Registerkarte Entwickler – Einfügen – Formularsteuerelemente – Bezeichnung), führen sie Evaluate("Label 1").Caption = "Hello"Evaluate("1").Caption = "Hello" die gleiche Vorgehensweise aus.

Die Verwendung eckiger Klammern (z. B. "[A1:C5]") entspricht dem Aufrufen der Evaluate-Methode mit einem Zeichenfolgenargument. Beispielsweise besitzen die folgenden Ausdruckspaare dieselbe Bedeutung:

[a1].Value = 25 
Evaluate("A1").Value = 25 
 
trigVariable = [SIN(45)] 
trigVariable = Evaluate("SIN(45)") 
 
Set firstCellInSheet = Workbooks("BOOK1.XLS").Sheets(4).[A1] 
Set firstCellInSheet = _ 
    Workbooks("BOOK1.XLS").Sheets(4).Evaluate("A1")

Der Vorteil der Verwendung von eckigen Klammern besteht darin, dass der Code kürzer ist. Der Vorteil der Verwendung von Evaluate besteht darin, dass das Argument eine Zeichenfolge ist, sodass Sie die Zeichenfolge entweder im Code erstellen oder eine Visual Basic-Variable verwenden können.

Beispiel

In diesem Beispiel wird der Inhalt der Zelle A1 in Sheet1 fett formatiert.

Worksheets("Sheet1").Activate 
boldCell = "A1" 
Application.Evaluate(boldCell).Font.Bold = True

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.

Freigeben über