PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
20546 03/11/07 19:34:37 RE(7):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By koni-ta
20536 03/11/05 16:30:46 RE(6):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By BAGGIO
20534 03/11/05 09:22:58 RE(5):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By Chicchi
20533 03/11/04 17:04:54 RE(4):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By koni-ta
20525 03/10/31 23:54:32 RE(3):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By Chicchi
20524 03/10/31 19:52:40 RE(2):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By koni-ta
20512 03/10/30 19:51:21 RE(1):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By Chicchi
20508 03/10/29 16:02:10 PB7.0: OLEコントロールでExcelファイルをSheet指定して表示 By koni-ta

カテゴリ:スクリプトの記述
日付:2003年11月07日 19:34 発信者:koni-ta
題名:RE(7):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示

Chicchiさん、BAGGIOさん、こんばんは。

Chicchiさん
またまたお礼が遅くなってしまいすみませんでした。
何回もご回答ありがとうございます。

>またまた無責任発言ですが、シートを指定する前にどのブックなのかの修飾子を入れなければ
>ならないのかも知れません。次の方法で試してみてください。

>ole_xxx.Object.ActiveWorkbook.Sheets(1).Select
>               ~~~~~~~~~~~~~~~
上記の記述も試してみましたが、だめでした。
\"アプリケーションの実行エラー\"、\"プロパティActiveworkbookのアクセスエラー。プロパティ名が不適切です\"
といったエラーが出ます。
その他にも試しに次の記述をしてみましたが、\"NULLオブジェクトの参照が行われた\"というエラーになりました。
ole_1.Object.Application.ActiveWorkbook.Sheets(1).Select

時間の関係上、こちらの方法はあきらめて、
Excelで書いた文書の画像ファイル(jpg)を表示させて対応しようと思います。
お忙しい中考えてくださり、本当にありがとうございました。
また質問することがあるかと思いますが、よろしくお願いします。


BAGGIOさん
ご回答ありがとうございます。
お礼が遅くなってしまい、すみませんでした。

>こんな↓、感じでできましたが・・・

>OLEObject xlapp, xlsub
> xlapp = CREATE OLEObject ;
> l_ret = xlapp.ConnectToNewObject(\"Excel.Application\")
> if (l_ret < 0) then
> goto FUNC_EXT
> end if
> xlapp.Application.Workbooks.Open(\"aaa.xls\",0,TRUE)
> xlapp.Application.Visible = FALSE
> xlsub = xlapp.Application.ActiveWorkBook.Worksheets[2]
> xlsub.Select()
> ・・・

しかし、今回  CREATE OLEObject
        ConnectToNewObject( \"excel.application\" )
を使用しておらず、OLEコントロールを使用しているんです・・・。
OLEコントロール使用時のsheetの指定の記述の仕方が知りたかったのですが、
今回は時間の関係上別の方法をとることにします(上にも書いてありますが)。
BAGGIOさんもお忙しい中、ご回答ありがとうございました。
今後もよろしくお願いします。



付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows 2000
DBMS Oracle SQL*Net 8
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS Oracle 8.0
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.