共用方式為

ShapeRange 物件 (Excel)

  • 發行項

代表圖案範圍，即文件上的一組圖案。

備註

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

範例

傳回您依名稱或索引編號指定的一組圖形

使用 範圍 (索引) ，其中 index 是圖案的名稱或索引編號，或是包含圖案名稱或索引編號的陣列，可傳回代表檔上一組圖案的 ShapeRange 集合。 使用 Array 函式 來建構名稱或索引編號的陣列。

下列範例會設定 myDocument 上第一個及第三個圖案的填滿圖樣。

Set myDocument = Worksheets(1) 
myDocument.Shapes.Range(Array(1, 3)).Fill.Patterned _ 
 msoPatternHorizontalBrick

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

雖然可以使用 Range 屬性傳回任意數目的圖案或投影片，但是，如果只要傳回集合中的單一成員，則使用 Item 方法會比較簡單。 例如， Shapes(1)是比 Shapes.Range(1)簡單。

Set myDocument = Worksheets(1) 
Set myRange = myDocument.Shapes.Range(Array("Oval 4", _ 
 "Rectangle 5")) 
myRange.Fill.Patterned msoPatternHorizontalBrick

傳回檔上所有或部分選取的圖案

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

Windows(1).Selection.ShapeRange.Fill.ForeColor.RGB = _ 
 RGB(255, 0, 255)

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

Windows(1).Selection.ShapeRange(2).Fill.ForeColor.RGB = _ 
 RGB(255, 0, 255)

方法

屬性

另請參閱

支援和意見反應

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