Cell.VerticalAlignment (Word)
Gibt die vertikale Ausrichtung von Text in mindestens einer Zelle einer Tabelle zurück oder legt diese Ausrichtung fest. Mögliche Rückgabewerte sind wdCellAlignVerticalBottom - Text wird am unteren Rand der Zelle ausgerichtet, wdCellAlignVerticalCenter - Text wird an der Mitte der Zelle ausgerichtet, wdCellAlignVerticalTop - Text wird am oberen Rand der Zelle ausgerichtet.
Set newDoc = Documents.Add
Set myTable = newDoc.Tables.Add(Selection.Range, 3, 3)
i = 1
For Each c In myTable.Range.Cells
c.Range.InsertAfter "Cell " & i
i = i + 1
Next
With myTable.Rows(1)
.Height = 20
.Cells.VerticalAlignment = wdAlignVerticalTop
End With