Здравствуйте, silentroach, Вы писали:

S>А кусочек кода глянуть можно?

Да. Вот:

uses
... OleServer,  Excel2000, ComObj;

...

var
  Template, Client_Name,Contract_Name,
    Period:String;
...
begin

...

Template := ExtractFilePath(Application.ExeName) + 'Templates\Balans.xls';

      with TExcelApplication.Create(nil) do
      begin
        AutoConnect := False;
        AutoQuit := False;
        ConnectKind := ckNewInstance;

        Connect;
        Workbooks.Add(Template, 1);
        Cells.Replace('?имя', Format('%s', [Client_Name]), xlWhole, xlByRows, false, EmptyParam);
        Cells.Replace('?договор', Format('%s', [Contract_Name]), xlWhole, xlByRows, false, EmptyParam);
        ADOQuery1 := TADOQuery.Create(nil);
        with ADOQuery1 do
        begin
          try
            Connection := DataModule2.ADOConnection1;
           ...
           //и далее запрос и вставка, запрос и вставка
           ...
        Visible[1] := true;
        Disconnect;
        Free;

это шаблон.

Точно так же и новый документ:

...
Workbooks.Add(EmptyParam, 1);
...