PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
22195 | 05/09/26 16:51:54 | RE(6):DWの内容をExcelへ出力後のExcelファイルについて By Hakofugu |
22190 | 05/09/21 18:47:22 | RE(5):DWの内容をExcelへ出力後のExcelファイルについて By isii |
22188 | 05/09/21 15:57:43 | RE(4):DWの内容をExcelへ出力後のExcelファイルについて By AzureRX-7 |
22184 | 05/09/20 10:19:23 | RE(3):DWの内容をExcelへ出力後のExcelファイルについて By Hakofugu |
22181 | 05/09/16 23:56:04 | RE(2):DWの内容をExcelへ出力後のExcelファイルについて By Hakofugu |
22173 | 05/09/16 16:23:04 | RE(1):DWの内容をExcelへ出力後のExcelファイルについて By t_wacky1974 |
22167 | 05/09/15 16:41:40 | DWの内容をExcelへ出力後のExcelファイルについて By Hakofugu |
カテゴリ:データウィンドウ
日付:2005年09月15日 16:41 発信者:Hakofugu
題名:DWの内容をExcelへ出力後のExcelファイルについて
皆さん、はじめまして。よろしくお願いします。
今回、DWの内容をExcelファイルへ出力する必要があり、以下の手順で
OLEオブジェクトを使ってスクリプトを記述しました。
Excelファイルは雛型のファイルを作成しておき、セットするデータは
セル単位に決まっています。
OLEObject lole_Excel
lole_Excel = CREATE OLEObject
li_Stat = lole_Excel.ConnectToObject(\"YYYYYY.xls\")
// ここでセル単位にセットし、色を設定する(必要なだけ記述する)
lole_Excel.application.workbooks(1).worksheets(1).cells(3, 2).Value = DWからGetItemした値
lole_Excel.application.workbooks(1).worksheets(1).cells(3, 2).Font.Color = 色コード
lole_Excel.application.workbooks(1).Save()
li_Stat = lole_Excel.DisConnectObject()
DESTROY lole_Excel
処理自体はエラーも発生せず、データも思ったようにセットされていました。
しかし、このExcelファイルを開く時に不思議な現象が起きています。
1.エクスプローラーでファイル名をダブルクリック
2.ファイルを右クリックして「ファイルを開く」
3.同様に「アプリケーションから開く」→Excelを選択
どの様に開こうとしてもExcel自体は起動するのですが、シートが表示されません。
Excelの「ウィンドウ」メニューから再表示を選択し、対象のファイルを
指定すると初めて表示されます。
このような動きが、仕様なのでしょうか?
それともスクリプトでの手順にミスがあり、このように動くのでしょうか?
皆様のお知恵を拝借いたしたく、投稿いたしました。
よろしくお願いします。
PBはVer8.0.3です。
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS Windows 2000
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.