Axes プロパティ

オブジェクト：Graph

• Read Only
  As Object
• 構文: Graph object.Axes

Axes プロパティは、指定した Graph オブジェクトの Axis オブジェクトをコレクションとして取得するのに使用します。それぞれの Axis オブジェクトには、複数の Line オブジェクトと Text オブジェクトがありますが、これらは、Axis オブジェクトの各種プロパティを使って取得します。

Examples

• 現在開いているページの１番目のグラフにある軸の数を表示します。

  Dim SPGraph As Object
  Set SPGraph = ActiveDocument.CurrentPageItem.GraphPages(0).Graphs(0)
  MsgBox "Graph " + SPGraph.Name + ": " + SPGraph.Axes.Count + " Axes",,"Number of Axes"
  

• 現在開いているページの最初のグラフにある X 軸の範囲を設定するためのダイアログ・インターフェースを作成します。

  Dim SPXAxis, Min, Max
  Set SPXAxis = ActiveDocument.CurrentPageItem.GraphPages(0).Graphs(0).Axes(0)
  SPXAxis.SetAttribute(SAA_OPTIONS,SAA_FLAG_AUTORANGE Or FLAG_CLEAR_BIT)
  Begin Dialog UserDialog 340,98,"X Axis Range" ' %GRID:10,7,1,1
  OKButton 240,7,90,21
  Text 20,14,90,14,"Minimum",.Text1
  TextBox 120,11,90,21,.Minimum
  Text 20,42,90,14,"Maximum",.Text2
  TextBox 120,39,90,21,.Maximum
  CancelButton 240,35,90,21
  End Dialog
  Dim dlg As UserDialog
  If Dialog(dlg) = 0 Then 'Handles Cancel button
  GoTo Finish
  End If
  Min = dlg.Minimum
  Max = dlg.Maximum
  SPXAxis.SetAttribute(SAA_FROMVAL,Min)
  SPXAxis.SetAttribute(SAA_TOVAL,Max)
  Finish: