PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
23896 | 12/09/06 14:34:25 | RE(2):EXCEL OLEオブジェクトの実行時エラー By Kindo-3 |
23895 | 12/09/05 13:20:37 | RE(1):EXCEL OLEオブジェクトの実行時エラー By めめ |
23893 | 12/09/03 13:58:08 | EXCEL OLEオブジェクトの実行時エラー By Kindo-3 |
カテゴリ:PowerBuilderの開発環境
日付:2012年09月03日 13:58 発信者:Kindo-3
題名:EXCEL OLEオブジェクトの実行時エラー
EXCELを操作するOLEオブジェクトの下記記述で、実行時にエラーとなります。
Pコードで実行ファイルを作成した場合はエラーになりませんが、マシンコードで
実行ファイルを作成するとエラーになります。
お客様要件により、マシンコードで実行したいのですが、対処方法を教えて頂けないでしょうか。
WindowsXP PB12.1 Excel2003 の環境です。
ちなみに同等のソースをPB6.5で実行していたときは落ちませんでした。
string ls_file1, ls_file2, ls_path
OLEObject xlApp
OLEObject objexcel
OLEObject objRange
ls_path = \"D:\\Temp\"
ls_file1 = \"Book1.xls\"
/* OLE Excel接続 */
xlApp = Create OLEObject
xlApp.ConnectToNewObject( \"Excel.Application\" )
/* Excel Bookを開く */
xlApp.Application.Workbooks.Open( ls_path + \"\\\" + ls_file1 )
/* ブック表示 */
xlApp.Application.Visible = TRUE
objexcel = xlApp.Application.Workbooks(ls_file1).Worksheets(1)
objRange = xlApp.ActiveSheet.Range(objexcel.Cells(2,2),objexcel.Cells(20,11))
// ↑↑↑↑↑ ここで落ちる ↑↑↑↑↑
objRange.Select
/* ブックを閉じる */
//xlApp.Application.Workbooks(ls_file1).Close
/* OLE Excel切断 */
xlApp.DisConnectObject()
Destroy xlApp
******************************************************
PowerBuilder アプリケーションの実行時エラー (R0019)
******************************************************
アプリケーションは中断されました。
エラー:Any型の変数 гvoid を oleobject に変換できません。関数 clickedの22行目...
******************************************************
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows XP
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.