我在操纵Excel表的时候遇到一个问题,向各位大虾求教,
void __fastcall TMain_Form::Month_SubMenuClk(TObject *Sender)
{
  try
      {
       ExcelApp = CreateOleObject ("Excel.Application");
      }
   catch(...)
        {
         ShowMessage("运行Excel出错,请检查并确认系统中安装了Office,然后再运行本软件");
         return;
        }
       TIniFile * ini;
       AnsiString  DefaultDir;
       AnsiString ExePath = ExtractFilePath( ParamStr ( 0 ) );
       ini = new TIniFile ( ExePath + "code.cod");
       DefaultDir = ini -> ReadString("BaseSet", "DefaultDir" , ExePath );
       delete ini;
       Workbook = ExcelApp.PG("workbooks").FN("Open", DefaultDir+"Example.xls");
       ExcelSheet = Workbook.PG("sheets", "Source_Sum");
       ExcelApp.PS("Visible",(Variant)false);
}
程序运行通过,语法上没问题,但是Sheet却显示不出来,通过进程查看了解到Excel确实也在运行,我想问各位如何处理,使Sheet显示出来。
qq:406163051