Excel - Salto de Hoja

shoulder · #1 18-07-2012

Hola ya lo resolviii!!

Código Delphi [-]//Encabezado
Excel.WorkBooks[1].WorkSheets[y].PageSetup.RightHeader := 'Anexo';
...
Excel.WorkBooks[1].WorkSheets[y].PageSetup.RightMargin := 10 ;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.LeftMargin := 16 ;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.HeaderMargin := 18;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.TopMargin := 136;
//Repito titulos en todas las hojas
Excel.WorkBooks[1].WorkSheets[y].PageSetup.PrintTitleRows := '$3:$7';

//Ordeno la solapa dos por empresa y fecha
Rango : OleVariant;
...
Rango := Excel.WorkBooks[1].WorkSheets[2].Range['A8:F8200'];
Rango.Sort(Excel.WorkBooks[1].WorkSheets[2].Range['E1'],EmptyParam,xlAscending,Excel.WorkBooks[1].WorkSheets[2].Range['B1'], xlAscending);

mRoman · #2 21-07-2012

Cita:

Empezado por shoulder

Hola ya lo resolviii!!

Código Delphi [-]//Encabezado
Excel.WorkBooks[1].WorkSheets[y].PageSetup.RightHeader := 'Anexo';
...
Excel.WorkBooks[1].WorkSheets[y].PageSetup.RightMargin := 10 ;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.LeftMargin := 16 ;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.HeaderMargin := 18;
Excel.WorkBooks[1].WorkSheets[y].PageSetup.TopMargin := 136;
//Repito titulos en todas las hojas
Excel.WorkBooks[1].WorkSheets[y].PageSetup.PrintTitleRows := '$3:$7';

//Ordeno la solapa dos por empresa y fecha
Rango : OleVariant;
...
Rango := Excel.WorkBooks[1].WorkSheets[2].Range['A8:F8200'];
Rango.Sort(Excel.WorkBooks[1].WorkSheets[2].Range['E1'],EmptyParam,xlAscending,Excel.WorkBooks[1].WorkSheets[2].Range['B1'], xlAscending);

Excelente felicidades ! Shoulder....que bueno q lo resolviste. Y gracias por agregar el código de solución.

Saludos !!

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Cambiar a Modo Lineal Modo Híbrido Cambiar a Modo Hilado

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Problema con ADO y Hoja Excel	mariofur	Conexión con bases de datos	3	18-06-2008 16:58:10
Hoja Excel via web	Nbull	Varios	0	02-02-2006 11:11:36
Excel Y Salto De Página	nax	C++ Builder	7	29-01-2006 20:20:27
Exportar a excel con mas de 1 hoja	Perio	Varios	6	25-01-2006 17:03:48
Formateando una hoja excel	xerkan	Servers	7	27-10-2003 16:38:47