共用方式為

PowerPoint) (PictureFormat.CropRight 屬性

會傳回或設定要從指定之圖片或 OLE 物件右邊裁去的點數。 讀取/寫入。

語法

表情。裁切權

詞 一個代表 PictureFormat 物件的變數。

傳回值

單一

註解

裁剪尺寸會計算相對於圖片的原始大小。 例如，如果您插入原先為 100 點寬的圖片、 使其為 200 點，重新調整，然後將 CropRight 屬性設為 50，100 點 (而不是 50 點) 將會被裁去右側的圖片。

範例

這個範例會從 myDocument 上第三個圖案的右邊裁去 20 點。 為使本範例正常執行，第三個圖案必須是圖片或 OLE 物件。

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes(3).PictureFormat.CropRight = 20

本範例會根據使用者指定的百分比裁掉所選圖案的右側，而不論該圖案是否經過縮放。 為使本範例正常執行，選取的圖案必須是圖片或 OLE 物件。

percentToCrop = InputBox("What percentage do you " & _
    "want to crop off the right of this picture?")

Set shapeToCrop = ActiveWindow.Selection.ShapeRange(1)

With shapeToCrop.Duplicate
    .ScaleWidth 1, True
    origWidth = .Width
    .Delete
End With

cropPoints = origWidth * percentToCrop / 100

shapeToCrop.PictureFormat.CropRight = cropPoints

另請參閱

PictureFormat 物件

支援和意見反應

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

  • Last updated on