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月05日 16:30 発信者:BAGGIO
題名:RE(6):PB7.0: OLEコントロールでExcelファイルをSheet指定して表示

>>やってみましたが、下記のようなエラーが出ました。
>>アプリケーション実行エラー、\"外部オブジェクト関数sheetsの呼び出しエラー\"です。
>>しかし、前回のエラーはコンパイル時に出ていたエラーで実行もできませんでしたが、
>>今回はコンパイルがとおり、実行した時にエラーが出ます。
>>あと少しなのではとは思うので、上の記述をもう少し検討してみようと思います。
>>また何か思いつくことでもありましたら教えて頂けると嬉しいです。
>>ありがとうございました。

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

>ole_xxx.Object.ActiveWorkbook.Sheets(1).Select
>               ~~~~~~~~~~~~~~~

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

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()
・・・


付加情報:

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.