|
OLE에서..Excel를 컨트롤 하는 법이 나왔는데...자세히 나오지 않았거든요..
WorkBooks과 WorkSheets,Sheet,Cells를 사용하려 하는데..
"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
void __fastcall TForm1::bbtnClick(..)
{
Filename = ExtractFilePath(Application->ExeName) + "RptXL\mal.xls";
xlmal = CreateOleObject("Excel.Application");
xlmal.WorkBooksOpen(Filename);
xlmal.OlePropertySet("Visible", false);
xlmal.WorkBooks[1].WorkSheets[1]->PrintOut();
if( !VarIsEmpty(xlmal)){
xlmal.DisplayAlerts = false;
xlmal.OleFunction("Quit");
}
Sheet = xlmal.WorkBooks[1].WorkSheets[1];
:
Sheet.Cells[3][5] = Query->FieldByName("Abc")->AsString;
:
Sheet.Cells[9][15] = Query->FieldByName("Bcd")->AsDateTime;
}
위와 같이 코딩을 하려(?) 하는데 엄청난 잘못을 하고 있는 거 같거든요..
WorkBooks과 WorkSheets,Sheet,Cells을 사용하려면 어떻게 해야할 지 ..
그리고. 위에서 잘못된부분을 지적해 주시면 정말 고맙겠습니다.
|