Select メソッド

オブジェクト：GraphItem

• タイプ: Sub
• 構文：GraphItem object.Select(AddToSelection:=variable boolean, Left:= variable variant, Top:= variable variant, Right:= variable variant, Bottom:= variable variant)

指定した選択範囲にある全てのオブジェクトを選択します。なお、"Top" = "Bottom" かつ "Right" = "Left" の場合、その選択内容は指定した点を含むオブジェクトになります。

"AddToSelection" が "False" の場合、前回の選択リストは、新規の選択リストに置き換わります。"True" の場合は、選択した新規アイテムが既存の選択リストに追加されます。

Examples

• グラフページ上の１アイテム (この場合はライン) を選択し、その太さ、タイプ、終点の外観を設定します（オブジェクトの位置は、座標系の設定によって変わります）。

  ActiveDocument.CurrentPageItem.Select(False, -5500, 4062, -5500, 4062)
  ActiveDocument.CurrentPageItem.Select(True, -1375, 875, -1375, 875)
  ActiveDocument.CurrentPageItem.Select(True, 2062, 1208, 2062, 1208)
  ActiveDocument.CurrentPageItem.SetSelectedObjectsAttribute(SEA_THICKNESS, 39)
  ActiveDocument.CurrentPageItem.SetSelectedObjectsAttribute(SEA_LINETYPE, 5)
  ActiveDocument.CurrentPageItem.SetSelectedObjectsAttribute(SEA_END2TYPE, 4)
  ActiveDocument.CurrentPageItem.SetSelectedObjectsAttribute(SEA_END1TYPE, 3)
  

• "Graph Page 1" に表示されているグラフを選択し、ビットマップ形式の画像ファイルとしてエクスポートします。

  Dim GraphPage As Object
  Set GraphPage =ActiveDocument.NotebookItems("Graph Page 1")
  GraphPage.Select(False,3500,1750,5000,3500)
  GraphPage.Export("c:\Mygraph.bmp","BMP")