Shape.ScaleWidth 方法

根据指定的系数缩放图形宽度。对于图片和 OLE 对象来说，可指明图形缩放是根据原尺寸还是当前尺寸。对于图片和 OLE 对象以外的其他图形来说，总是相对于当前宽度进行缩放。

语法

表达式.ScaleWidth(Factor, RelativeToOriginalSize, fScale)

表达式 一个代表 Shape 对象的变量。

参数

名称	必选/可选	数据类型	描述
Factor	必选	Single	指定形状调整后的宽度与当前或原始宽度的比例。例如，若要将一个矩形放大百分之五十，请将此参数指定为 1.5。
RelativeToOriginalSize	必选	MsoTriState	指定是否相对于形状的当前或原始尺寸来缩放形状。
fScale	可选	MsoScaleFrom	在缩放形状时，形状中位置不变的部分。

说明

MsoTriState 可以是下列 MsoTriState 常量之一。

msoCTrue

msoFalse：相对于形状的当前尺寸缩放。

msoTriStateMixed

msoTriStateToggle

msoTrue 相对于原始大小缩放该形状。仅当指定形状是图片或 OLE 对象时，才为此参数指定 msoTrue。

MsoScaleFrom 可以是下列 MsoScaleFrom 常量之一。

msoScaleFromBottomRight

msoScaleFromMiddle

msoScaleFromTopLeft：默认值。

示例

本示例将 myDocument 上的所有图片和 OLE 对象放大至原高度和宽度的 175%，将所有其他形状放大至当前高度和宽度的 175%。

示例代码

示例代码
`let myDocument = ActivePresentation.Slides.Item(1) let s = myDocument.Shapes for (let i = 1; i <= s.Count; i++){ switch(s.Item(i).Type){ case msoEmbeddedOLEObject, msoLinkedOLEObject, msoOLEControlObject, msoLinkedPicture, msoPicture: s.Item(i).ScaleHeight (1.75, msoTrue) s.Item(i).ScaleWidth (1.75, msoTrue) break default: s.Item(i).ScaleHeight (1.75, msoFalse) s.Item(i).ScaleWidth (1.75, msoFalse) } }`

let myDocument = ActivePresentation.Slides.Item(1)
let s = myDocument.Shapes
for (let i = 1; i <= s.Count; i++){
    switch(s.Item(i).Type){
        case msoEmbeddedOLEObject, msoLinkedOLEObject, msoOLEControlObject, msoLinkedPicture, msoPicture:
            s.Item(i).ScaleHeight (1.75, msoTrue)
            s.Item(i).ScaleWidth (1.75, msoTrue)
            break
        default:
            s.Item(i).ScaleHeight (1.75, msoFalse)
            s.Item(i).ScaleWidth (1.75, msoFalse)
    }
}

请参阅