AutoRotateNumbers Property
Returns or sets lateral compression. Read/write MsoTriState.
| MsoTriState can be one of these MsoTriState constants. |
| msoCTrue |
| msoFalse Half-width numbers will not be compressed in lateral columns. |
| msoTriStateMixed |
| msoTriStateToggle |
| msoTrue Displays half-width numbers within vertical text in two-character lateral columns. |
Example
This example sets the text direction of shape three on the first slide to vertical text, and sets lateral column compression.
Set myDocument = ActivePresentation.Slides(1)
With myDocument.Shapes(3).TextFrame
.Orientation = msoTextOrientationVerticalFarEast
.TextRange.Font.AutoRotateNumbers = msoTrue
End With