引言: jackwu 您好: 不好意思想幫你結果自己也搞不定 < > 請各位大大幫忙< >底下是我參考寫的code但會有錯誤

void __fastcall TForm1::Button1Click(TObject *Sender)
{
    int i,j;
    Variant Excel,Workbooks,Workbook;
    Variant Worksheets,Worksheet,Item,Name;        Excel=CreateOleObject("Excel.Application");
    //Excel.OlePropertySet("Visible",true);
    Workbooks=Excel.OlePropertyGet("Workbooks");
    Workbook=Workbooks.OleFunction("open", "c:\\book1.xls");
    //Workbook=Workbooks.OleFunction("Add");
    Worksheets=Workbook.OlePropertyGet("Worksheets");        /*for(i=1;i<=3;i  )
    {
        Worksheets.OleFunction("Add");
        Item = Worksheets.OlePropertyGet("Item",i);
        Name = Item.OlePropertyGet("Name");
    }*/        for(i=1;i<=3;i  )
    {
        Item = Worksheets.OlePropertyGet("Item" , i);
        ShowMessage(Item.OlePropertyGet("Name"));
    }
}
 

先謝謝大家的閱讀 祝 順心 < face="Verdana, Arial, Helvetica"> 國泰平安 發表人 - Gemi0305 於 2003/10/07 14:11:25