[cuburu]

De forma inmediata se me ocurre que el problema no es tanto de el manejo de excel, por lo que veo estas haciendo una llamada a una tabla que contiene un apuntador y vas agregando una nueva hoja por cada registro de dicha tabla. ¿No sería mejor realizar un conteo del total de registros que tienes y en base a ello hacer el ciclo para agregar las hojas que necesites?

Lo que tienes en tú código:

Código Delphi [-]
while not CUsuarios.Eof do
begin
   excel.sheets[1].select;
   excel.sheets['PLANTILLA'].copy(EmptyParam, excel.sheets[1]);
   CUsuarios.Next;
end;

Podrías intentar con algo como esto:

Código Delphi [-]
var
  NoUsers, Cont: Integer;
begin
  NoUsers := CUsuarios.Count;  {Revisa esta parte de la sintaxis pues no la recuerdo bien}
  for Cont := 1 to NoUsers do
  begin
   excel.sheets[1].select;
     excel.sheets['PLANTILLA'].copy(EmptyParam, excel.sheets[1]);
  end;
end;

Espero te sirva esta idea, suerte.