- 締切済み
保存してもワークブック&シートが消えています(Excel)
プログラミング初心者です。今DelphiでExcelを操作するプログラムを作成しており、Serversコンポーネントを使わずにOLEオブジェクトを使って操作しています。DelPhi側でExcelを起動させて、既存のファイルにDelPhiで取り出したSQLのデータをExcelに表示させるというものですが、データを上書き保存してもExcelのブックが消えていているようで、保存したxlsを起動させてもブック及びシートが表示されません。但し印刷プレビューには保存していたデータがプレビューされます。 原因が分からないので、申し訳ありませんがよろしくお願いします。 書いたプログラム↓ (uses節にComObj,Excel2000があります。) Var Excel,WorkBook,WorkSheet: Variant; ... ... Excel := CreateOleObject('Excel Application'); WorkBook := Excel.WorkBooks.Open(FileName := 'C:\@@@.xls',ReadOnly := False); WorkSheet := WorkBook.Wordsheets[1]; WorkSheet.Name := '@@@'; ... ...(以下Record取得の表記など) Excel.Visible := True; (Recordを取得し、値をCellにセットしてからVisibleをTrueにしています。) ... 大変読みにくくて申し訳ありませんがよろしくお願いします。環境はDelphi7,Excel2000,SQLServer2000です。
- みんなの回答 (1)
- 専門家の回答
みんなの回答
- jmh
- ベストアンサー率23% (71/304)
Workbook.Save() したのに、C:\@@@.xls が削除されている(または元通りになっている)と言っていますか?
補足
回答ありがとうございます。 >Workbook.Save() したのに、C:\@@@.xls が削除されている(または元通りになっている)と言っていますか? はい。Saveはしています。ちゃんとそこまで書けば良かったです。すいません。ちなみに削除はされません。シートが表示されないんです。こちら質問内容がおかしかったです。 あと、この質問内容は自分で解決しました。 自分が書いたコードではExcelを閉じてもプロセスが残ってしまうようで、動作がおかしくなってしまっていたようです。ご迷惑をおかけしました。