共用方式為

ShapeRange 物件 (PowerPoint)

代表圖案範圍，也就是文件上的一組圖案。 圖案範圍最少只會含有文件中的一個圖案，最多可以含有文件中的所有圖案。

註解

你可以包含任何你想要的形狀——從文件中所有形狀中挑選，或是選擇中的所有形狀——來構建一個形狀範圍。 例如，您可以建構包含文件的前三個圖案、 所有選取的圖形或文件上的所有手繪多邊形的 ShapeRange 集合。

關於如何同時處理單一形狀或多個形狀的概述，請參見 Work with shapes (drawing objects) 。

下列範例說明如何：

  • 回傳一組形狀，並以名稱或索引號指定。

  • 傳回文件中全部或部分選取的圖案。

範例

使用 Shapes.Range (索引) ，其中 index 是形狀的名稱或索引號，或包含形狀名稱或索引號的陣列，來回傳一個代表文件中一組形狀的 ShapeRange 集合。 使用 Array 函式來構建一個名稱或索引編號的陣列。 下列範例會設定 myDocument 上第一個及第三個圖案的填滿圖樣。

Set myDocument = ActivePresentation.Slides(1)

myDocument.Shapes.Range(Array(1, 3)).Fill _

    .Patterned msoPatternHorizontalBrick

下列範例會設定 myDocument 上 Oval 4 及 Rectangle 5 圖案的填滿圖樣。

Set myDocument = ActivePresentation.Slides(1)

Set myRange = myDocument.Shapes _

    .Range(Array("Oval 4", "Rectangle 5"))

myRange.Fill.Patterned msoPatternHorizontalBrick

雖然你可以用 範圍 方法回傳任意數量的形狀或幻燈片，但如果你只想回傳集合中的單一成員，使用 項目 方法會更簡單。 例如， Shapes(1)是比 Shapes.Range(1)簡單。

使用 Selection 物件的 ShapeRange 屬性來回傳選取中的所有形狀。 本範例會將填滿前景色彩的第一個視窗中，假設選取範圍中的所有圖形的選取範圍中的至少一個圖形。

Windows(1).Selection.ShapeRange.Fill.ForeColor _

    .RGB = RGB(255, 0, 255)

使用 Selection.ShapeRange (索引) ，其中 index 是形狀名稱或索引號，可以在選取範圍內回傳單一形狀。 下列範例會將填滿前景色彩的第二個圖案的選取的圖案集合中第一個視窗，假設中至少有兩個圖形選取範圍中。

Windows(1).Selection.ShapeRange(2).Fill.ForeColor _

    .RGB = RGB(255, 0, 255)

方法

屬性

另請參閱

支援和意見反應

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

  • Last updated on