DataLabel.Orientation (Excel)

Returns or sets a value that represents the text orientation. Possible return values are xlDownward - Text runs downward, xlHorizontal - Text runs horizontally, xlUpward - Text runs upward, xlVertical - Text runs downward and is centered in the cell.

The value of this property can be set to an integer value from -90 to 90 degrees or to one of the XlOrientation constants.

ActiveCell.Width(1).DataLabel.Orientation = xlDownward