VerticalAlignment Property Example
This example sets the height of row 2 on Sheet1 to twice the standard height and then centers the contents of the row vertically.
Worksheets("Sheet1").Rows(2).RowHeight = _
2 * Worksheets("Sheet1").StandardHeight
Worksheets("Sheet1").Rows(2).VerticalAlignment = xlVAlignCenter