ScaleHeight Property Example

This example sets the height and width of the first inline shape in the active document to 150 percent of the shape's original height and width.

With ActiveDocument.InlineShapes(1)
    .ScaleHeight = 150
    .ScaleWidth = 150
End With