Cell.VerticalAlignment (Word)
Devuelve o establece la alineación vertical del texto en una o varias celdas de una tabla. Posibles valores de retorno son wdCellAlignVerticalBottom - El texto se alinea al borde inferior de la celda, wdCellAlignVerticalCenter - El texto se alinea al centro de la celda, wdCellAlignVerticalTop - El texto se alinea al borde superior de la celda.
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