delphi控制execl单元合并的问题

我现在用delphi把数据表导出到execl中,其中有的标题单元要合并的, 
我采用如下语句:  
    try
    Excelid:=CreateOleObject( 'Excel.Application' );
  except
    on Exception do raise exception.Create('无法创建Xls文件，请确认是否安装EXCEL')
  end;
  Excelid.Visible := True;
  Excelid.WorkBooks.Add;
  i:=2;
  Excelid.WorkSheets[1].Cells[i,3].Value := '数据';
  Excelid.WorkSheets[1].Cells[i,4].Value := '        ';
  Excelid.worksheets[1].range['B2:C2'].select;
  Excelid.worksheets[1].range['B2:C2'].Merge(true);
就是在合并execl总是弹出对话框提示说合并时有包含多重数值,只能保留左边的数据.然后点确定即可.
能否不让execl弹出来啊,默认就好了,因为我是用程序来控制的啊,都这样来提示,那不是很麻烦了,如何处理,谢谢各位了