SigmaPlot 製品ページ

更新日： 16/01/29

オブジェクト：NamedDataRange

• Read/Write
  As String
• 構文: NamedDatRange object.NameOfRange

NamedDataRange オブジェクトの名称を設定したり返します。列タイトルと行タイトルの一覧を名前付き範囲として取得するのに役立ちます。

Example

• 以下のサンプルは、現在開いているノートブックにあるワークシート "Data 1" から NamedDataRanges コレクションを取得し、それらの名称を一覧表示するものです。

  Dim NamedRangeArray$()
  Dim SPRanges
  Set SPRanges = ActiveDocument.NotebookItems("Data 1").DataTable.NamedRanges
  ReDim NamedRangeArray$(SPRanges.Count)
  Dim Index
  Index = 0
  Dim Item
  For Each Item In SPRanges
  NamedRangeArray$(Index) = SPRanges(Index).NameOfRange
  Index = Index + 1
  Next Item
  Begin Dialog UserDialog 320,119,"Named Ranges in Data 1" ' %GRID:10,7,1,1
  OKButton 210,14,90,21
  ListBox 20,14,170,91,NamedRangeArray(),.ListBox1
  End Dialog
  Dim dlg As UserDialog
  Dialog dlg