掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Excel保存時にアクティブなシートを指定するには？ (ID:4985)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Mr.XRAYさん、にしのさん、ありがとうございます。 > Mr.XRAYさん にしのさんがおっしゃる通りな感じで、 Delphiで保存したExcelファイルを普通に開いた時に シート１がアクティブになっているようにしたい次第なのです。 > にしのさん WorkSheet := WorkBook.WorkSheets[1]; の意味を取り違えていました。 変数なども変えて下記のようにしました。 (Windows2000, Delphi5, Excel2000 SP3) procedure TForm1.Button1Click(Sender: TObject); var OpenFileName: String; Excel: Variant; WorkBook: Variant; WorkSheet: Variant; begin OpenFileName := 'c:\test.xls'; Excel := CreateOleObject('Excel.Application'); Excel.Visible := false; Excel.WorkBooks.Open(FileName := OpenFileName, readOnly := false); WorkBook := Excel.ActiveWorkbook; WorkSheet := Excel.ActiveSheet; //シート３に書き込む WorkSheet := WorkBook.WorkSheets[3]; WorkSheet.Cells[2,3].Value := 'test'; //シート１をアクティブにする Excel.ActiveSheet := WorkBook.WorkSheets[1]; // ← ● WorkBook.Save; //上書き保存 Excel.WorkBooks.Close; Excel.Quit; end; すると、「メンバが見つかりません」というメッセージが出てしまいます。。 Ｗｅｂなどでも調べたのですがわかりませんでした。 どうかご教授をお願いします。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.