|
// Excel 参照
if ( LOWORD(wParam) == IDC_REF ) {
Buff->SetChar( 0, 0 );
if ( CurApp->Commdlg->OpenFileName( Buff ) ) {
Tool.WaitCursor( true );
Dlg->EditSetText( IDC_EXCEL, Buff );
CurApp->ExcelApp->Open( Buff );
int i,nCount;
nCount = CurApp->ExcelApp->SheetCount();
CurApp->SheetName->Reset();
for( i = 1; i <= nCount; i++ ) {
CurApp->ExcelApp->GetSheetName( i, Item );
CurApp->SheetName->Add( Item, Item );
}
Tool.WaitCursor( false );
}
}
| |