Rows.Add, méthode (Word)
Renvoie un objet Row qui représente une ligne ajoutée à un tableau.
expression. Ajouter ( _BeforeRow_
)
expression Obligatoire. Variable qui représente un objet Rows .
Nom | Requis/Facultatif | Type de données | Description |
---|---|---|---|
BeforeRow | Facultatif | Variant | Objet Row qui représente la ligne située immédiatement sous la nouvelle ligne. |
Ligne
Cet exemple montre comment insérer une nouvelle ligne avant la première ligne de la sélection.
Sub AddARow()
If Selection.Information(wdWithInTable) = True Then
Selection.Rows.Add BeforeRow:=Selection.Rows(1)
End If
End Sub
Cet exemple montre comment ajouter une ligne dans le premier tableau, puis insérer le texte « Cell » au niveau de cette ligne.
Sub CountCells()
Dim tblNew As Table
Dim rowNew As Row
Dim celTable As Cell
Dim intCount As Integer
intCount = 1
Set tblNew = ActiveDocument.Tables(1)
Set rowNew = tblNew.Rows.Add(BeforeRow:=tblNew.Rows(1))
For Each celTable In rowNew.Cells
celTable.Range.InsertAfter Text:="Cell " & intCount
intCount = intCount + 1
Next celTable
End Sub
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.