Einzelnen Beitrag anzeigen

Rainer Wolff

Registriert seit: 25. Okt 2005
Ort: Bretten
318 Beiträge
 
Delphi 10.4 Sydney
 
#1

Excel Bereich lesen und wieder schreiben, Formeln weg

  Alt 21. Feb 2012, 14:48
Hallo,

mit folgendem Codeschnipsel lese ich einen Bereich von Excelzellen und schreibe ihn wieder zurück. Dann sind aber alle Formeln, die vorhanden waren, verschwunden.
Früher (in der guten alten Zeit, D5, Excel 2000) hat das alles mal funktioniert.
Code:
var
  oleArray:OleVariant;
  Excel: Variant;
begin
  Excel := CreateOleObject('Excel.Application');
  Excel.Workbooks.Open ('e:\prodavi50\fwf-583\excel\pc_feuille.xls');
  Excel.Visible := true;

  Excel.Sheets[1].select;
  OleArray:=Excel.Sheets[1].Range['A1','Z80'].Value;
  OleArray[12,1]:=5;
  Excel.Sheets[1].Range['A1','Z80'].Value:=OleArray;
Delphi XE, Office 2007 (mit Office 2003 siehts aber wohl genauso aus)

Gruß Rainer
  Mit Zitat antworten Zitat