Ups... ya encontré el Error. El error era mío.
Código Delphi
[-]for I := 0 to 10 do
Hoja.Cells.Item[I,2]...
Pues no existe la Fila 0(cero) entonces el for debe iniciar desde 1.
Código Delphi
[-]for I := 1 to 10 do
Hoja.Cells.Item[I,2]...
Y así si funciona correctamente...