OLE - delphiを使用して既存のExcelファイルを呼び出す

Question

私はそれに渡されるデータのフォーマットを含むExcelファイルを持っています。誰かが既存のExcelファイルを開く方法を教えてくれますか？

var 
    myExcel:variant; 
begin 
    myExcel:=CreateOleObject('Excel.application'); 
    myExcel.caption:='Summary of Check Issued'; 
    myExcel.visible:=false; 
    myexcel.workbooks.add(1); 
end 

このステートメントは新しいExcelファイルを作成しますが、私の望むものは既存のExcelファイルを開くだけの文です。

Answer 1

あなたが探しているコードの正確な行は次のとおりです。

var 
    ExcelFile : Variant; 
    WorkBook : Variant; 
    WorkSheet : Variant; 

begin 

    // Open Excel OLE 
    ExcelFile := CreateOleObject('Excel.Application'); 

    // Handle WoorkBook 
    if not VarIsNull(ExcelFile) then begin 
     WorkBook := ExcelFile.WorkBooks.Open('yourfilename.xls'); 

     if not VarIsNull(WorkBook) then begin 
     // Handle Sheet 
      WorkSheet := WorkBook.WorkSheets.Item['yourSheetName']; 
     end; 

    end; 

は、より詳細な情報については、this articleを参照してください：

WorkBook := ExcelFile.WorkBooks.Open('yourfilename.xls'); 

完全なコードは次のようになります。