Word VBA教程:InsertFormula方法

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

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

expression.Formula(Formula, NumberFormat)

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

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

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

说明

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

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

VBA示例

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


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"

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号