// >>>Ion Lupascu 06.05.2009 Add this methods
	int GetSheetsCount();
	bool SetActiveSheet(int index);
	bool SetActiveSheet(String name);
	bool SetSheetName(String new_name);
	// <<<Ion Lupascu 06.05.2009

// >>> Ion Lupascu 06.05.2009 Add this methods
int MSSheet::GetSheetsCount(){
	if (!Book)
		return(-1);
	
	return((int)Ole::GetValue(Ole::GetObject(Book, "Sheets"), "Count"));
}

// Set active sheet start with 0(zero)
bool MSSheet::SetActiveSheet(int index){
	if(!Book)
		return false;
	
	VariantOle index_ole;
	index_ole.Int4(index + 1);
	
	if (!(Sheet = Ole::GetObject(Book, "Sheets", index_ole)))
		return false;

	return true;
}

// Set active sheet by name
bool MSSheet::SetActiveSheet(String name){
	if(!Book)
		return false;
	
	VariantOle name_ole;
	name_ole.BString(name);
	
	if (!(Sheet = Ole::GetObject(Book, "Sheets", name_ole)))
		return false;

	return true;
}

bool MSSheet::SetSheetName(String new_name){
	if(!Sheet)
		return false;
	
	VariantOle new_name_ole;
	new_name_ole.BString(new_name);
	
	return Ole::SetValue(Sheet, "Name", new_name_ole);
}
// <<< Ion Lupascu 06.05.2009

// >>> Ion Lupascu 06.05.2009 Add this methods
int OfficeSheet::GetSheetsCount(){
	if (!data)
		return -1;
	if (type == SheetOPEN)
		return -1; //... need to add ((OPENSheet*)data)->GetSheetsCount();
	else if (type == SheetMS)
		return ((MSSheet*)data)->GetSheetsCount();
	else
		return -1;
}

// Set active sheet start with 0(zero)
bool OfficeSheet::SetActiveSheet(int index){
	if (!data)
		return false;
	if (type == SheetOPEN)
		return false; //... need to add ((OPENSheet*)data)->SetActiveSheet(index);
	else if (type == SheetMS)
		return ((MSSheet*)data)->SetActiveSheet(index);
	else
		return false;
}

// Set active sheet by name
bool OfficeSheet::SetActiveSheet(String name){
	if (!data)
		return false;
	if (type == SheetOPEN)
		return false; //... need to add ((OPENSheet*)data)->SetActiveSheet(name);
	else if (type == SheetMS)
		return ((MSSheet*)data)->SetActiveSheet(name);
	else
		return false;
}

bool OfficeSheet::SetSheetName(String new_name){
	if (!data)
		return false;
	if (type == SheetOPEN)
		return false; //... need to add ((OPENSheet*)data)->SetActiveSheet(name);
	else if (type == SheetMS)
		return ((MSSheet*)data)->SetSheetName(new_name);
	else
		return false;
}
// <<< Ion Lupascu 06.05.2009

// Set active sheet by name
bool MSSheet::SetActiveSheet(String name){
	if(!Book)
		return false;
	
	VariantOle name_ole;
	name_ole.BString(name);
	
>>HERE  if (!(Sheet = Ole::GetObject(Book, "Sheets", name_ole)))
		return false;

	return true;
}