Crear varias hojas excel desde builder

[lauragar]

HOLA !!

Tengo aplicacion en la que hago una consulta a una base de datos sql y los registros que me recupera los exporto a un fichero excel.
Todo va bien cuando el numero de hojas a exportar son 3, cuando son mas me da un error.Supongo que esto será por que por defecto excel tiene 3 hojas.

El codigo que tengo puesto es el siguiente;

Excel = Variant::CreateObject("Excel.Application");
Excel.OlePropertySet("Visible", true);
Libro=Excel.OlePropertyGet("Workbooks");
Libro.OleProcedure("Add");
Hoja=Libro.OlePropertyGet("Item",1);
Libro=Hoja.OlePropertyGet("Worksheets");

Libro.OlePropertyGet("Item",1).OlePropertySet("Nam e","Nom1");
Libro.OlePropertyGet("Item",2).OlePropertySet("Nam e","Nom2");
Libro.OlePropertyGet("Item",3).OlePropertySet("Nam e","Nom3");
Libro.OlePropertyGet("Item",4).OlePropertySet("Nam e","Nom4");
Libro.OlePropertyGet("Item",5).OlePropertySet("Nam e","Nom5");

Cuando llamo a la hoja 4 (Hoja=Libro.OlePropertyGet("Item",4);)es cuando me da el error.

Alguien sabe como puedo solucionar este problema?, necesito crear tantas hojas como necesito?.De se así como lo puedo hacer?

De ante mano muchas gracias.

Saludos!!