Application.Evaluate-Methode (Excel)

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.

  • A1-Bezugsart. 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 Bereichs-, Überlagerungs- und Vereinigungsoperatoren (Doppelpunkt, Leerzeichen bzw. 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 einen in einer anderen Arbeitsmappe definierten Namen zu verweisen, Evaluate("[BOOK1.XLS]Sheet1!A1")z. B. .

  • Diagrammobjekte. Sie können einen beliebigen Namen des Diagrammobjekts angeben, z. B. Legend, Plot Area oder Series 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.

  • Formularsteuerelementnummer. Sie können eine Zahl sowie einen Namen angeben, um auf das Formularsteuerelement in einem Arbeitsblatt zu verweisen. For example, for Label located on a worksheet (Developer tab - Insert - Form Controls - Label), both Evaluate("Label 1").Caption = "Hello" and Evaluate("1").Caption = "Hello" do the same.

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 eckige 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 entweder die Zeichenfolge 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.