通过

Range.Formula 属性 (Excel)

  • 项目

返回或设置一个 Variant 值，该值代表对象的 A1 样式表示法中的隐式交叉公式。

语法

表达式。公式

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

备注

在启用了动态数组的 Excel 中，Range.Formula2 取代了 Range.Formula。 将继续支持 Range.Formula 以保持反向兼容性。 有关动态数组和 Range.Formula2 的讨论，请参阅 Excel VBA 文档主题 Formula 与 Formula2。

另请参阅

Range.Formula2 属性

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

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

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

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

使用 Range.Formula 设置的公式可能会触发隐式交集。

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

示例

以下代码示例设置 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.Formula = "=text(now(),""mmm dd yyyy"")" 
    Selection.Columns.AutoFit 
End Sub

支持和反馈

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