C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[63957] 스트링그리드 엑셀저장시 오류발생문제 입니다.
Beckham [s26fa] 2039 읽음    2011-03-21 16:45
int i, j;
    Variant XLApp, XLSheets, XLSheet, XLBooks, XLBook;
    gStMValName = "\\D\\Measure" + FormatDateTime("YYYY-MM-DD HH:MM:SS", Now()) + ".xls";

    XLApp = CreateOleObject("Excel.Application");
    XLApp.OlePropertySet("DisplayAlerts", false);
    XLApp.OlePropertySet("Visible", false);
    XLBooks = XLApp.OlePropertyGet("Workbooks");
    XLBooks.OleProcedure("Add");
    XLBook = XLBooks.OlePropertyGet("Item", 1);
    XLSheets = XLBook.OlePropertyGet("Worksheets");
    XLSheet = XLSheets.OlePropertyGet("Item", 1);
    XLSheet.OlePropertySet("Name", "측정값");
    XLSheet = XLApp.OlePropertyGet("ActiveSheet");

    for (i = 0; i < sgrdMData->ColCount; i++)
        for (j = 0; j < sgrdMData->RowCount; j++) {
            XLSheet.OlePropertySet("Cells", j + 1, i + 1, sgrdMData->Cells[i][j].c_str());
            }

    XLBook.OleProcedure("SaveAs", gStMValName.c_str()); ----> 에러발생(EOleSysError with message '예외
    가  발생했습니다" )  
    XLBook.OleFunction("Close", (Variant)false);
    XLSheet = Unassigned;
    XLBook = Unassigned;
    XLApp.OleFunction("Quit");                              //Excel 프로그램 종료
    XLApp = Unassigned;


"XLBook.OleProcedure("SaveAs", gStMValName.c_str());" 이부분에서 "예외발생" 에러가 발생합니다.
XLBook.OleProcedure("Save") 이렇게 하면 에러없이 내문서에 제대로 저장이 되는데..계속해서
다른이름으로 업데이트 해야하는 파일이라서 "SaveAs"를 사용해야 합니다.

고수님들 조언부탁드립니다. 감사합니다.

+ -

관련 글 리스트
63957 스트링그리드 엑셀저장시 오류발생문제 입니다. Beckham 2039 2011/03/21
63958     Re:스트링그리드 엑셀저장시 오류발생문제 입니다. kylix 1877 2011/03/21
63963         Re:Re:스트링그리드 엑셀저장시 오류발생문제 입니다. Beckham 2324 2011/03/21
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.