Selection.SelectRow (Word)

Sélectionne la ligne qui contient le point d'insertion ou toutes les lignes qui contiennent la sélection.

Si la sélection ne se trouve pas dans un tableau, une erreur se produit.

Selection.Collapse Direction:=wdCollapseStart 
If Selection.Information(wdWithInTable) = True Then 
 Selection.SelectRow 
End If