Selection.Cells (Word)
Gibt eine Cells -Auflistung zurück, die die Tabellenzellen in einer Auswahl darstellt.
Informationen zum Zurückgeben eines einzelnen Elements einer Auflistung finden Sie unter zurückgeben eines Objekts aus einer Auflistung.
If Selection.Information(wdWithInTable) = True Then
Selection.Cells(1).Shading.BackgroundPatternColorIndex = wdRed
Else
MsgBox "The insertion point is not in a table."
End If