Delphi-Quellcode:
function TForm1.summe(index: Integer): Integer;
var i: Integer;
begin
result := 0;
if index > 0 then
begin
for i := 0 to index do
Inc(Result,maxwert[i]+5);
end;
end;
Das ganze springt einfach an die richtige Stelle im Excel sheet in dem alle vorherigen Datensätze in der neuen Koordinate berücksichtigt werden.