|
선택한 파일을 바로여는건 ShellExecute 로 검색해 보십시요..
그리고 (엑셀) 검색어로 찾아보시면 더 자료가 나올겁니다.
아래는 엑셀을 스트링그리드로 불러오는겁니다.
#include "utilcls.h"
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Variant ex=Variant::CreateObject("Excel.Application");
ex.OlePropertyGet("WorkBooks").OleProcedure("Open","c:\\리스트1.xls");
Variant awb=ex.OlePropertyGet("ActiveWorkBook");
Variant sh=awb.OlePropertyGet("ActiveSheet");//엑티브sheet
// Variant sh=awb.OlePropertyGet("Sheets").OlePropertyGet("item",1);//sheet1
// Variant sh=awb.OlePropertyGet("Sheets").OlePropertyGet("item",2);//sheet2
int row=sh.OlePropertyGet("UsedRange").OlePropertyGet("Rows").OlePropertyGet("Count"); //row갯수
int col=sh.OlePropertyGet("UsedRange").OlePropertyGet("Columns").OlePropertyGet("Count");//col갯수
StringGrid1->RowCount=row+1;
StringGrid1->ColCount=col+1;
for(int j=0;j<row;j++){
for(int i=0;i<col;i++){
StringGrid1->Cells[i+1][j+1]=sh.OlePropertyGet("Cells",j+1,i+1).OlePropertyGet("Value");
}
}
awb.OleProcedure("Close");
ex.OleProcedure("Quit");
awb=Unassigned;
ex=Unassigned;
}
최연수 님이 쓰신 글 :
: 안녕하십니까..이틀전에 볼랜드 C++ 6.0을 깐 초보입니다.
: OpenDialog를 하여 Dialog는 띄웠는데요.선택한 파일(엑셀)을 바로 열수는 없나요.
: 그리고 열려진 엑셀 파일을 Grid로 바로 저장 할 수 는 없나요..
:
: 너무 질문이 황당합니까?
:
: 사실은 이게 쉬운건지 어려운건지도 잘 모르겠습니다.
:
: 아시는 분은 아주 작은 것이라도 좋으니 답변 부탁드립니다.
최연수 님이 쓰신 글 :
: 안녕하십니까..이틀전에 볼랜드 C++ 6.0을 깐 초보입니다.
: OpenDialog를 하여 Dialog는 띄웠는데요.선택한 파일(엑셀)을 바로 열수는 없나요.
: 그리고 열려진 엑셀 파일을 Grid로 바로 저장 할 수 는 없나요..
:
: 너무 질문이 황당합니까?
:
: 사실은 이게 쉬운건지 어려운건지도 잘 모르겠습니다.
:
: 아시는 분은 아주 작은 것이라도 좋으니 답변 부탁드립니다.
|