// 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 );
	}
}