掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
ExcelのデータをDelphiで読み込むには？ (ID:4605)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
お世話になっております。 さっそくですが過去ログの 「ExcelのデータをDelphiで読み込むには」にて、 ウォレスさんの以下のサンプルで 保存したファイルからは読み込めましたが 現在表示されている、シートの内容を 読み込むには、どのようにすればよいのでしょうか？ それともシートの内容が更新される度に、 上書き保存してやる必要がありますか？ よろしくお願いします。 --------------------------------------------------- var ExcelApp: Olevariant; ExcelBook: Olevariant; ExcelSheet: Olevariant; iRow: Integer; iCol: Integer; Ctmp: Variant; begin ExcelApp := CreateOleObject('Excel.Application'); ExcelBook := ExcelApp.WorkBooks.Open('c:\tmp\test.xls', False); ExcelSheet := ExcelBook.WorkSheets['テスト用']; Memo1.Clear; for iRow := 1 to 5 do begin Ctmp := ''; for iCol := 1 to 5 do begin Ctmp := ExcelSheet.Cells[iRow, iCol].value; Memo1.Lines.Add(InttoStr(Ctmp)); end; end; end; ---------------------------------------------------
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.