Прочитать на английском

Поделиться через


Метод Cell.AutoSum (Word)

Вставляет поле = (формула), которое вычисляет и отображает сумму значений в ячейках таблицы выше или слева от ячейки, указанной в выражении.

Синтаксис

выражение. AutoSum

выражение (обязательно). Переменная, представляющая объект Cell.

Замечания

Сведения о том, как Word определяет добавляемые значения, см. в разделе Метод Formula .

Пример

В этом примере создается таблица 3x3 в новом документе и суммы чисел в первом столбце.

Dim docNew as Document 
Dim tableNew as Table 
 
Set docNew = Documents.Add 
Set tableNew = docNew.Tables.Add(Selection.Range, 3, 3) 
 
With tableNew 
 .Cell(1, 1).Range.InsertAfter "10" 
 .Cell(2, 1).Range.InsertAfter "15" 
 .Cell(3, 1).AutoSum 
End With

В этом примере суммирование чисел выше или слева от ячейки, содержащей точку вставки.

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

См. также

Объект Cell

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.