Excel) (Range.Formula2 属性

返回或设置一个 Variant 值，该值以 A1 样式数组表示法表示对象公式。

语法

表达式。Formula2

expression 一个表示 Range 对象的变量。

备注

此属性对于 OLAP 数据源无效。

在启用了动态数组的 Excel 中，Range.Formula2 取代了 Range.Formula。 将继续支持 Range.Formula 以保持反向兼容性。 有关动态数组和 Range.Formula2 的详细信息，请参阅 Formula 与 Formula2。

如果单元格包含一个常量，此属性返回该常量。 如果单元格为空，此属性返回空字符串。 如果单元格包含公式， 则 Formula 属性将公式作为字符串返回，格式与在编辑栏中显示的格式相同， (包括等号 ( = ) ) 。

如果将单元格的值或公式设置为日期，Microsoft Excel 将验证该单元格的格式是否已设置为某个日期或时间数字格式。 否则，Excel 会将数字格式更改为默认的短日期数字格式。

如果指定区域是一维或二维区域，则可将公式指定为 Visual Basic 中相同维数的数组。 同样，也可在 Visual Basic 数组中使用公式。

使用 Range.Formula2 设置的公式将始终作为数组进行计算，如果返回的结果超过 1 个，则可能会溢出。

如果为多单元格区域设置公式，则会用公式填充该区域所有的单元格。

示例

以下代码示例设置 Sheet1 中 A1 单元格的公式。

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

下列代码示例设置 Sheet1 中 A1 单元格的公式，以显示今天的日期。

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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。