Cell.AutoSum, méthode (Word)
Insère un champ = (Formula) qui calcule et affiche la somme des valeurs contenues dans les cellules de tableau situées au-dessus ou à gauche de la cellule spécifiée dans l'expression.
expression. AutoSum
expression Obligatoire. Variable qui représente un objet « Cell ».
Pour plus d'informations sur la façon dont Word détermine les valeurs à utiliser, voir la méthode Formula.
Cet exemple montre comment créer un tableau composé de trois lignes et trois colonnes dans un nouveau document et comment calculer la somme des nombres contenus dans la première colonne.
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
Cet exemple montre comment calculer la somme des nombres situés au-dessus ou à gauche de la cellule qui contient le point d'insertion.
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
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.