Stringgrid a Excel

[LuisAlf::]

Hola a todos!

Estoy de regreso por aquí por un problema con este truco que encontre en el club DELPHI (Exportar un stringGrid a Excel)

http://www.clubdelphi.com/trucos/ind...l=0&scrollb=88

Primero: Tuve que crear la unit "Excel_TLB", porque la ponia en la sección de "uses" y no la reconocia: menú Project> Import Type Library...

Segundo: Al compilar de nuevo mi proyecto me saltarón errores en estas partes del procedimiento del truco:

Código Delphi [-]
             
try
  if pos('/', cells[i, linea - 1]) <> 0 then begin
    AuxFecha := strtodatetime(cells[i, linea - 1]));//<<<<<<<<<<<<<----------------------
    ws.Cells.Item[ExLin, ExCol] := AuxFecha;
  end
  else AuxFecha := strtodatetime('GENERA EXCEPCION'); 
except

Según mi deducción fue porque habia un parentesis demás y lo borre.

Después pude correr mi aplicación pero al accionar el botón de exportación salta un error en el try... Diciendo que:

raised exception class EConvertError with message "GENERA EXCEPCION' is not a valid date and time'.

Y allí ya no se que hacer para que me funcione la exportación a excel

Si alguien me pudiera orientar para hacer funcionar el código se lo agradeceria grandemente...