Ein Edit.Text in eine vorgefertigte Excel Datei suchen.

[zeina]

Dank für eure Hilfe,
Ich habe noch ein problem und zwar:
wie kann man zeigen,wie viel columns für jeder Row gibt?
Ich habe eine Funktion,durch die man Anzahl der spalten von einer bestimmten Row sehen könnten:


[DP] function TForm1.show(ad:string):integer;
var x,y:integer;
begin
Result:=0;
for X := 1 to 3 do
begin
for Y := 1 to 4 do
begin
if ad =excel.cells.Item[y, x].Value then
Result:= Excel.Cells[y,x].row;
end;
end;
end;[/DP]