Scaling Property

Microsoft Word Visual Basic

expression.Scaling

expression    Required. An expression that returns a Font object.

Example

This example horizontally stretches the text in the active document to 110 percent of its original size.

ActiveDocument.Content.Font.Scaling = 110
		

This example compresses the text in the first paragraph in Sales.doc to 90 percent of its original size.

With Documents("Sales.doc").Paragraphs(1).Range.Font
    .Scaling = 90
    .Bold = False
End With