안녕하세요.
정성훈입니다.

소스의 다음부분이 잘못 사용되었군요.
Memo1->Lines->GetText()

아래와 같이 사용하면 해결될 것입니다.
Memo1->Lines->Strings[j]

*참고*
Memo의 Text는 메모 전체 내용입니다. 따라서 개행문자가 포함되어 있습니다.
하지만 Strings는 한줄만을 의미합니다. 따라서 개행문자가 포함되어 있지 않습니다.

님의 소스는 메모에 5줄의 내용이 있다면 엑셀에 5셀에 넣게 하는 것인듯한데요...

도움말의 Memo속성을 보면 구조가 나와있습니다.
Text와 Strings를 잘 구별해서 사용하세요.

-------------------------------------------
작은 생각이 세상을 바꾼다. -정성훈.해미-
-------------------------------------------


신디 님이 쓰신 글 :
: 안녕하세여?
:
: 신디입니다.
:
: 얼마전에 메모데이타를 엑셀로 저장하는 질문 드렸는데
:
: 허접하게나마 해결은 했는데 몇가지 문제점 발생
:
: 일단 메모에 데이타를 엑셀에 저장을 했구여
:
: 1.엑셀파일에 셀안에 Enter까지 저장되더라구여
:   12345다음에 이상한 문자가 저장이 되거든여
:   첨부파일 참고하세여.
:
: 2.버튼을 클릭하면 Load되구여
:   코드는 아래와 같음
: void __fastcall TForm1::Button1Click(TObject *Sender)
: {
:     int k, j;
:     ExApp->Connect();
:     // true 화면에 보임, false 화면에 보이지 않음
:     ExApp->set_Visible(0,false);
:     ExBook->ConnectTo(ExApp->Workbooks->Add());
:     //첫번째 워크시트와 연결
:     ExWS->ConnectTo(ExApp->Worksheets->get_Item((TVariant)1));
:     //워크시트의 이름
:     ExWS->set_Name(WideString("test"));
:     k = Memo1->Lines->Count;
:     for(j = 0 ; j <= k -1; j++)
:     {
:         ExWS->Cells->set_Item((TVariant)(j + 1), (TVariant)"A", (TVariant)Memo1->Lines->GetText());
:     }
:
:     //여기에 문제 있는 듯 엔터가 이상한 문자로 나오는데 도통알수가 ...
:    ExBook->SaveAs((TVariant)"C:\\Source\\Test.xls",TNoParam(),TNoParam(),TNoParam(),TNoParam(),TNoParam(),xlExclusive,TNoParam(),TNoParam(),TNoParam(),TNoParam(),0);
:
:     //Excel 프로그램 종료
:     ExApp->Disconnect();
:     ExBook->Disconnect();
:     ExWS->Disconnect();
: }
:
:
:
:
:
:
: