Notebooks プロパティ

オブジェクト：Application

• Read Only
  As Object (collection)
• 構文: Notebooks

Application オブジェクトの Notebooks コレクションをオブジェクトとして返すプロパティです。 Notebooks コレクションは、個々の Notebook オブジェクトを取得したり、新規ノートブックを作成するのに使用します。

Example

以下のスクリプトは、全てのノートブックを取得してそのタイトルを表示するものです。なお、Title プロパティが NotebookItem の名称を表示するのに対して、Name プロパティはファイル名を返しますが、ノートブックを保存するまでは作成されません。

• 例

  Dim NotebookList$()
  ReDim NotebookList$(Notebooks.Count)
  Dim Index
  Index = 0
  Dim Item
  For Each Item In Notebooks
  NotebookList$(Index) = Notebooks(Index).Title
  Index = Index + 1
  Next Item
  Begin Dialog UserDialog 320,119,"Open Notebook List" ' %GRID:10,7,1,1
  OKButton 210,14,90,21
  ListBox 20,14,170,91,NotebookList(),.ListBox1
  End Dialog
  Dim dlg As UserDialog
  Dialog dlg