一个ole保存的问题，希望你的到来

Question

有个ole控件
里面有execl文件(从数据库中生成的)，现在保存成文件
  v := CreateOleObject('EXCEL.Application');    v.Application.WorkBooks.Add;
    OleContainer1.oleObjECt.ACTiveSheet.Cells.Copy;    v.apPLication.WOrkbooks[1].WorkSheets[1].Paste ;
    v.Application.WorkBooks[1].SaveAs(sdSave.FileName);    v.quit;这样只保存ole中激活的页面，我希望全部保存，如何循环（希望在我这个上面修改）。
并且保存的excel每个页面名称和ole中的也要一样。