ShapeRange.GetWidth 方法 (Publisher)

會以 單一 以指定的單位傳回圖案或圖案範圍的寬度。

語法

運算式。GetWidth (Unit)

表達 代表 ShapeRange 物件的 變數。

參數

名稱	必要/選用	資料類型	描述
Unit	必要	PbUnitType	傳回寬度的單位。 可以是 Microsoft Publisher 類型程式庫中所宣告的 PbUnitType 常 數之一。

傳回值

單一

註解

使用 GetHeight 方法可傳回圖形或圖形範圍的高度。

範例

下列範例以英吋 (接近百分之一) 顯示使用中出版物首頁中，由所有圖案構成的圖案範圍高度及寬度。

With ActiveDocument.Pages(1).Shapes.Range 
 MsgBox "Height of all shapes: " _ 
 & Format(.GetHeight(Unit:=pbUnitInch), "0.00") _ 
 & " in" & vbCr _ 
 & "Width of all shapes: " _ 
 & Format(.GetWidth(Unit:=pbUnitInch), "0.00") _ 
 & " in" 
End With

支援和意見反應

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