InsertFormula 方法

插入包含选定内容的公式的 = (Formula) 域。

注意   如果选定内容不折叠，则该公式将替换选定内容。

expression   必需。该表达式返回一个 Selection 对象。

Formula  Variant 类型，可选。= (Formula) 域求值的数学公式。可以使用与电子表格类似的方式引用表格中的单元格。例如，“=SUM(A4:C4)”指定了第四行中的前三个值。有关 = (Formula) 域的详细内容，请参阅域代码：= (Formula) 域。

NumberFormat   Variant 类型，可选。= (Formula) 域结果所采用的格式。有关可用的格式类型的详细内容，请参阅数字图片 (\#) 域开关。

说明

如果正在使用电子表格应用程序（如 Microsoft Excel），那么在文档中嵌入全部或部分电子表格比在表格中使用 = (Formula) 域更简单易行。

只有当选定内容在一个单元格中，并且插入点所在的单元格的上方或左边至少有一个包含值的单元格时，Formula 参数才是可选的。如果插入点上方的单元格包含值，则插入的域是 {=SUM(ABOVE)}；如果插入点左边的单元格包含值，则插入的域是 {=SUM(LEFT)}；如果插入点上方和左边的单元格都含有值，则 Microsoft Word 使用下面的规则确定插入何种 SUM 函数。

• 如果紧邻插入点上面的单元格中含有数值，则 Word 插入 {=SUM(ABOVE)}。
• 如果紧邻插入点上方的单元格不包含值，而紧邻插入点左边的单元格包含值，则 Word 插入 {=SUM(LEFT)}。
• 如果紧邻插入点上方的单元格和下方的单元格都不包含值，则 Word 插入 {=SUM(ABOVE)}。
• 如果没有指定 Formula，并且插入点上方和左边的所有单元格都是空的，则使用 = (Formula) 会发生错误。

示例

本示例在活动文档的开始处创建一个三行三列的表格，然后计算第一列中所有数值的平均值。

Set MyRange = ActiveDocument.Range(0, 0)
Set myTable = ActiveDocument.Tables.Add(MyRange, 3, 3)
With myTable
    .Cell(1, 1).Range.InsertAfter "100"
    .Cell(2, 1).Range.InsertAfter "50"
    .Cell(3, 1).Select
End With
Selection.InsertFormula Formula:="=Average(Above)"

本示例插入一个公式域，该域减去书签“GrossSales”所代表的值，结果设置为美元符号。

Selection.Collapse Direction:=wdCollapseStart
Selection.InsertFormula Formula:= "=GrossSales-45,000.00", _
    NumberFormat:="$#,##0.00"