Style.Orientation (Excel)

Returns or sets an XlOrientation value that represents the text orientation.

xlDownward - Text runs downward, xlHorizontal - Text runs horizontally, xlUpward - Text runs upward, xlVertical - Text runs downward and is centered in the cell.
ActiveCell.Style.Orientation = xlDownward
Style.Orientation procedure builder