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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.