Word) (Shape.ScaleWidth 方法

會依指定的比例，調整圖案的寬度。

語法

運算式。ScaleWidth (Factor、 RelativeToOriginalSize、 Scale)

需要 expression。 代表 Shape 物件的變數。

參數

名稱	必要/選用	資料類型	描述
因素	必要	Single	會指定圖案調整後的寬度與其現有寬度或原始寬度之間的比例。 例如，如果要將矩形放大 50%，請將此引數設定為 1.5。
RelativeToOriginalSize	必要	MsoTriState	True 是表示 調整圖案相對於原來的大小。 為 false 來擴充相對於目前的大小。 您可以指定 true 是表示 此引數只有當指定的圖案是圖片或 OLE 物件。
Scale	選用	MsoScaleFrom	調整圖案大小時，圖案中位置保持不變的部分。

註解

如果是圖片及 OLE 物件，可以指定在調整圖案大小時是要相對於原始大小還是相對於目前大小。 如果是圖片及 OLE 物件以外的其他圖案，則一律是相對於目前的寬度來調整其大小。

範例

本範例將 myDocument 中所有的圖片和 OLE 物件的高度和寬度調整為原有尺寸的 175%，而將所有其他圖案的高度和寬度調整為現有尺寸的 175%。

Set myDocument = ActiveDocument 
For Each s In myDocument.Shapes 
 Select Case s.Type 
 Case msoEmbeddedOLEObject, msoLinkedOLEObject, _ 
 msoOLEControlObject, _ 
 msoLinkedPicture, msoPicture 
 s.ScaleHeight 1.75, True 
 s.ScaleWidth 1.75, True 
 Case Else 
 s.ScaleHeight 1.75, False 
 s.ScaleWidth 1.75, False 
 End Select 
Next

另請參閱

Shape 物件

支援和意見反應

有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。