[gilberto_1126]

y para iniciar una busqueda en toda la hoja puedes hacer lo siguiente:

Por ejemplo tenemos una hoja de 10 columnas por 20 filas

for i:=1 to 10 do
begin
for j:=1 to 20 do
begin
cadena:=ExcelApplication1.Cells.Item[i,j].Value;
if cadena='Hola' then
ExcelApplication1.Cells.Item[i,j].Value:='Chau';
end;
end;