Rows.Add, méthode (Word)

Renvoie un objet Row qui représente une ligne ajoutée à un tableau.

Syntaxe

expression. Ajouter ( _BeforeRow_ )

expression Obligatoire. Variable qui représente un objet Rows .

Parameters

Valeur renvoyée

Ligne

Exemple

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

Voir aussi

Collection d'objets Rows

Assistance et commentaires

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.