Club Builder

[lauragar]

Hola a todos!!

Tenga una aplicacion en la cual hago una consulta a una base de datos sql y exporto los datos que recupera a un fichero. Los datos los exporta bien pero necesito saber como se crean nuevas hojas en el libro, por que solo exporta hasta la tercera hoja y cuando intento exportar la hoja 4 me da un error.
El codigo que tengo puesto es el siguiente:

Variant Excel,Libro,Hoja,Celda;

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("Name","Num1");
Libro.OlePropertyGet("Item",2).OlePropertySet ("Name","Num2");
Libro.OlePropertyGet("Item",3).OlePropertySet("Name","Num3");
Libro.OlePropertyGet("Item",4).OlePropertySet("Name","Num4");
Libro.OlePropertyGet("Item",5).OlePropertySet("Name","Num5");
Libro.OlePropertyGet("Item",6).OlePropertySet("Name","Num6");

Si alguien sabe algo sobre este tema por favor que conteste.

Saludos!!

[rayder]

Utiliza algo como esto