자유롭게 질의 및 응답을 할 수 있는 게시판입니다. 개발자 여러분의 답변이 큰 도움이 됩니다. 
  • 제품설치/등록 오류 문의: 설치/등록 Q&A 이용 (제품 구매 고객 한정)

C++ Builder 엑셀 저장, 읽기 기능에서 오류 문의

2018.12.07 11:51

포세가이 조회 수:1748

본 게시판은 개발자들이 자유롭게 질문과 답변을 공유하는 게시판입니다.
* 따라서 최대한 정중하게 질문을 올려 주세요.
* 질문을 상세히 작성해 주실 수록 좋은 답변이 올라 옵니다.
* 다른 분들도 참고할 수 있도록 결과 댓글 필수(또는 감사 댓글)
(결과 댓글을 달지 않는 경우 다음 질문에 대한 답변이 달리지 않는 불이익이 있을 수 있습니다.)
-----------------------------------------------------------------------------------------------

안녕하세요

10.1 도쿄버전 c++빌더 사용중입니다.

아래와 같이 특정 폴더에 있는 엑셀 파일을 열어서 수정하고 저장하는 기능을 구현중인데

"피호출자를 호출하지 못하였습니다."라는 오류 메시지가 뜨네요

그리고 작업관리자에 엑셀일 실행이 되고있어 일일일 수작업으로 지워줘야하구요

설정에 문제가 없는지 확인 부탁드립니다.

 


char dBuf[100];
int excel_col;
Variant excel_app;
Variant excel_book, excel_books;
Variant excel_sheet;
Variant excel_window;
Variant cells;
Variant Data;
Variant interior;
Variant column;
WideString ExcelData;
AnsiString asFileName;
Variant value;

 

String DefaultOpenPath={"C:\\ICS Default Set\\ICS Default Set.xlsx"};


void __fastcall TMainForm::Button_DefaultSaveClick(TObject *Sender)
{
  AnsiString TestStr, StrPoint;
  WideString Temp, SaveStr;
  char sTemp=0;


  Temp=DefaultOpenPath;

  excel_app=Variant::CreateObject("excel.application");                      //Excel 프로그램 실행
  excel_app.OlePropertySet("Visible", (Variant)false);                        //Excel 프로그램 Visible설정
  excel_app.OlePropertyGet("WorkBooks").OleProcedure("Open",Temp);
  excel_book=excel_app.OlePropertyGet("ActiveWorkbook");                     //현재 Active된 WorkBook 선택
  excel_sheet=excel_book.OlePropertyGet("ActiveSheet");                      // WorkBook에서 Acitve된 Sheet선택
  excel_app.OlePropertySet("DisplayAlerts", false);                                   //파일 저장 묻기 메시지 off
 

 

  TestStr=(Ru_MainForm->ComboBox_HighTemp->ItemIndex+80);
  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",TempHighPoint[0], TempHighPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));

 

  if(Ru_MainForm->CheckBox_Fa1->Checked==false)    TestStr="OFF";
  else              TestStr="ON";
  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",Fa1_SetupPoint[0], Fa1_SetupPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));

 

  if(Ru_MainForm->CheckBox_Fa5->Checked==false)    TestStr="OFF";
  else              TestStr="ON";
  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",Fa5_SetupPoint[0], Fa5_SetupPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));


  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",AutoShutdownPoint[0], AutoShutdownPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));

 

  TestStr=(Ru_MainForm->ComboBox_ConDlInputUpper->ItemIndex+31)*-1;
  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",DlInputUpperPoint[0], DlInputUpperPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));

 

  TestStr=(Ru_MainForm->ComboBox_ConDlInputLower->ItemIndex+50)*-1;
  strcpy(dBuf, TestStr.c_str());
  cells = excel_sheet.OlePropertyGet("Cells",DlInputLowerPoint[0], DlInputLowerPoint[1]);
  cells.OlePropertySet("Value", WideString(dBuf));

 

  SaveStr=DefaultOpenPath;
  excel_book.OleProcedure("SaveAs",SaveStr);
  excel_book.OleFunction("Close", (Variant)False);
  excel_sheet = Unassigned;
  excel_book = Unassigned;
  excel_app.OleFunction("Quit");
  excel_app = Unassigned;
}

 

이 게시물을
목록
목록
번호 제목 글쓴이 날짜 조회 수
공지 [프로그래밍 강의] 2021.6~2021.12 관리자 2015.01.22 17267
공지 유용한 관련 사이트 관리자2 2014.03.20 56161
공지 본 게시판은 개발자 여러분들의 질문과 답변을 공유하는 공간입니다. 관리자 2012.01.10 99584
124 DBGIRD 내용을 PDF로 저장하는 방법 문의 [1] JKPARK 2016.05.16 489
123 Raize 컴포넌트 사용방법 문의 [1] 이영진 2017.07.19 490
122 안드로이드 모바일과 PC USB로 통신 [1] 권동한 2020.04.22 496
121 OpenCV, VC++에서는 잘 동작하는데,C++ Builder에서 빌드가 안되는 문제가 있네요. [1] WayneKim 2018.11.05 504
120 IntraWeb 관련하여 문의 드립니다. [1] salasi 2017.08.11 506
119 한글깨짐 모바일맨 2018.05.02 508
118 질문 있습니다. XE3에서 TMSSOFTWARE의 TWebGMaps을 사용하는데 오류 [1] 데브기어만세 2015.03.27 515
117 png Image Button에서 Flickering문제 [5] 오늘도좋은하루 2021.05.12 525
116 [마이그레이션] bpr 파일(C++빌더 6.0)을 10.1 베를린에서 열수 없어요. 험프리 2017.01.18 534
115 C++빌더 컴포넌트 중 3D 관련 컴포넌트는 어떤 것이 있나요? [1] Humphery 2015.03.11 535
114 시드니 10.4.1에서 Code Insight가 동작 되지 않아요. [3] file 오늘도좋은하루 2020.10.24 542
113 TwineCompile 에러가 발생 했는데, 수정은 어떻게 하나요? 하루 2021.01.19 543
112 Thread안의 변수문의 [1] 한시민 2018.02.07 550
111 [bcc32c Error] : illegal character encoding in string literal 에러 [3] 하루 2018.12.06 550
110 Run(F9) 실행시 XE10 툴이 메인모니터 쪽으로 이동하는 현상 [3] 지오 2015.12.24 561
109 마우스 클릭폼 맨 앞으로 기능 [2] 포세가이 2018.11.08 574
108 C++ Builder 10 Seattle Lib 변환에 대한 질문 드립니다. [1] 옵토 2017.02.27 574
107 RAD Studio 평가판 기간이 만료되었습니다. [3] file 땅콩맨 2017.09.24 579
106 Max heap size 관련 문의 [1] 빛찬 2017.04.13 581
105 c++ Builder에도 메모리 릭을 감지할수 있는 툴이 있나요? [3] junho103 2018.03.06 588
쓰기
태그