25.2.2　OLEメソッドとOLEプロパティの操作

OLEメソッドやOLEプロパティを操作する場合は，生成または取得したOLEオブジェクトからのコンテナやコレクションを含んで定義する必要があります。このときコンテナやコレクションの参照に誤りがあると，実行時にエラーとなります。

コンテナおよびコレクションの概念については，マニュアル「COBOL2002　言語　拡張仕様編」　「18.1.1(5)　コレクション」および「COBOL2002　言語　拡張仕様編」　「18.1.1(6)　コンテナ」を参照してください。

Openメソッド，Visibleプロパティ，Valueプロパティ，PrintOutメソッドを使った操作の例を次に示します。

OLEメソッドとOLEプロパティの操作例

       WORKING-STORAGE SECTION.
       01 AP-OBJ USAGE OBJECT REFERENCE OLE.
       PROCEDURE DIVISION.
           INVOKE 'Excel.Application' 'CREATEOBJ'
              RETURNING AP-OBJ.
           INVOKE AP-OBJ 'Workbooks.Open'
              USING VALUE 'C:\SAMPLE1.XLS'. …1.
           SET 'Visible' WITH AP-OBJ TO 1. …2.
           SET 'Workbooks(1).Worksheets(1).Cells(1,1).Value'
                  WITH AP-OBJ TO 'ABCD'. …3.
           SET 'Workbooks(1).Worksheets(1).Cells(1,2).Value'
                  WITH AP-OBJ TO 'ABCD'.
           SET 'Workbooks(1).Worksheets(1).Cells(1,3).Value'
                  WITH AP-OBJ TO 'ABCD'.
           SET 'Workbooks(1).Worksheets(1).Cells(1,4).Value'
                  WITH AP-OBJ TO 'ABCD'.
           SET 'Workbooks(1).Worksheets(1).Cells(1,5).Value'
                  WITH AP-OBJ TO 'ABCD'.
           INVOKE AP-OBJ
               'Workbooks(1).Worksheets(1). PrintOut'. …4.

例の説明

1. 作成済みのファイルをオープンします。

2. シートを表示します。

3. セルに値を設定します。

4. シートを印刷します。