AutoSum Method
Applies To
Cell object.
Description
Inserts an = (Formula) field that calculates and displays the sum of the values in table cells above or to the left of the cell specified in the expression. For information about how Word determines which values to add, see the Formula method.
Syntax
expression.AutoSum
expression Required. An expression that returns a Cell object.
See Also
Formula method.
Example
This example creates a 3x3 table in a new document and sums the numbers in the first column.
Set newDoc = Documents.Add
Set myTable = newDoc.Tables.Add(Selection.Range, 3, 3)
With MyTable
.Cell(1,1).Range.InsertAfter "10"
.Cell(2,1).Range.InsertAfter "15"
.Cell(3,1).AutoSum
End With
This example sums the numbers above or to the left of the cell that contains the insertion point.
Selection.Collapse Direction:=wdCollapseStart
If Selection.Information(wdWithInTable) = True Then
Selection.Cells(1).AutoSum
Else
MsgBox "The insertion point is not in a table."
End If