Range.Formula2-Eigenschaft (Excel)

Gibt einen Variant-Wert zurück, der die Formel des Objekts in der Arraynotation A1 darstellt, oder legt diesen wert fest.

Syntax

Ausdruck. Formel2

Ausdruck Eine Variable, die ein Range-Objekt darstellt.

Bemerkungen

Diese Eigenschaft ist für OLAP-Datenquellen nicht verfügbar.

In Excel mit aktivierten dynamischen Arrays ersetzt Range.Formula2 Range.Formula. Range.Formula wird weiterhin unterstützt, um die Backkompatibilität aufrechtzuerhalten. Weitere Informationen zu Dynamic Arrays und Range.Formula2 finden Sie unter Formel und Formel2.

Wenn die Zelle eine Konstante enthält, gibt diese Eigenschaft eine Konstante zurück. Wenn die Zelle leer ist, gibt die Eigenschaft eine leere Zeichenfolge zurück. Wenn die Zelle eine Formel enthält, gibt die Formula-Eigenschaft die Formel als Zeichenfolge im gleichen Format zurück, das in der Bearbeitungsleiste angezeigt wird (einschließlich des Gleichheitszeichens ( = )).

Wenn Sie den Wert oder die Formel einer Zelle auf ein Datum setzen, prüft Microsoft Excel, ob die Zelle bereits in einem der Datums- oder Zeitformate formatiert ist. Andernfalls ändert Excel das Zahlenformat in das Standardformat für kurze Datumszahlen.

Wenn der Bereich einen ein- oder zweidimensionalen Bereich darstellt, können Sie für die Formel eine Visual Basic-Matrix mit derselben Dimension festlegen. Ebenso können Sie die Formel auch in eine Visual Basic-Matrix einfügen.

Formeln, die mit Range.Formula2 festgelegt wurden, werden immer als Array ausgewertet und können überlaufen, wenn mehr als 1 Ergebnis zurückgegeben wird.

Beim Festlegen der Formel für einen Bereich mit mehreren Zellen wird die Formel in alle Zellen des Bereichs eingetragen.

Beispiel

Im folgenden Beispiel wird die Formel für Zelle A1 in "Sheet1" gesetzt.

Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"

Im folgenden Beispiel wird die Formel für Zelle A1 in „Sheet1" gesetzt, um das Datum des aktuellen Tages anzuzeigen.

Sub InsertTodaysDate() 
    ' This macro will put today's date in cell A1 on Sheet1 
    Sheets("Sheet1").Select 
    Range("A1").Select 
    Selection.Formula2 = "=text(now(),""mmm dd yyyy"")" 
    Selection.Columns.AutoFit 
End Sub

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.