Hallo zusammen,
ich bin gerade dabei Daten aus meiner Anwendung nach Excel zu schreiben. Das funktioniert soweit auch ganz gut.
Code:
ExcelApp := GetActiveOleObject;
for i := 1 to Datensatzanzahl do
begin
// ....
// LTitle und LNummer mit Daten füllen
// ...
ExcelApp.Sheets[1].Cells[LZeile,1].Value := LTitle;
ExcelApp.Sheets[1].Cells[LZeile,2].Value := LNummer;
ExcelApp.Sheets[1].Cells[LZeile,3].Formula := '=VERKETTEN("*",$B$'+IntToStr(LZeile)+',"*")';
ExcelApp.Range['D'+IntToStr(LZeile)+':D'+inttoStr(LZeile)].Select;
ExcelApp.Selection.Font.Size := 22;
ExcelApp.Selection.Font.Name := 'Ccode39';
end;
ExcelApp.ActoveWorkBook.SaveAs(LDateiname);
ExcelApp.DisplayAlerts := False;
ExcelApp.Quit;
ExcelApp := Unassigned;
Es soll in der ersten Spalte ein Titel eingetragen werden, in der zweiten Spalte eine Nummer und in der dritten Spalte soll die Verknüpfung von *Nummer* erfolgen (also der Wert aus der zweiten Spalte mit * davor und dahinter).
Wenn ich das ausführe erhalte ich in der Zelle mit der Verkettung "#NAME?"
Ich muss in den Zellen mit der Formeln einmal mit "F2" den Editiermodus starten und diesen mit ENTER beenden. Dann wird die Formel richtig interpretiert und ich bekomme die Verkettung angezeigt die ich will.
Hat jemand eine Idee, woran das liegen könnte? Es sollte doch möglich sein, dass die Formel auch direkt richtig ausgewertet wird.
Gruß,
Rainer