FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Salto de pagina en excel
Alguien me podia ayudar a hacer un salto de pagina para el objeto: Excel:=CreateOleObject('Excel.Application') se que la macro que crea el excel para hacer el salto de pagina es esta:
ActiveWindow.SelectedSheets.HPageBreaks.Add Before:=ActiveCell Pero no se muy bien como pasarsela al delphi sobre el objeto excel para q la ejecute, ya que intento hacer: Excel.ActiveWorkbook.WorkSheets[1].HPageBreaks.Add; y me indica que el numero de parametros no es valido y no se q parametro indicarle Última edición por xerkan fecha: 31-10-2003 a las 11:23:27. |
#2
|
|||
|
|||
No se si te entendido.
Pero a ver si esto te sirve cuando me hablas de salto de pagina supongo que hablas de ir a otra hoja no? Yo lo que hago es que creo, primero el numero de hojas que necesitare, y luego me muevo por ellas. Código:
ExcelApplication1.Connect; //Conectamos con Excel ExcelApplication1.Visible[0]:=visible; // lo mostramos ExcelWorkBook1.ConnectTo( //Añadimos un libro ExcelApplication1.Workbooks.Add(xlWorksheet, 0));//si aqui en el 0 pongo emptyparam me hace tres hojas.Asi solo una excelworkbook1.Sheets.Add(emptyparam,EmptyParam,7,1,0); //el primer param es el numero de paginas +1 ya hecha de antes Entonces me muevo por las hojas asi ExcelWorkSheet1.ConnectTo( // y obtenemos una de sus hojas ExcelApplication1.Sheets[n] as _WorkSheet); ExcelWorkSheet1.Name := TITULO HOJA'; n es un int del 1 al 8.Que son las páginas que tienes |
#3
|
|||
|
|||
No me refiero a eso, me refiero a crear un salto de pagina (en excel menu insertar/salto de pagina) o sea en la hoja forzar a que el contenido de esta se imprima en la pagina siguiente si haber acabado la actual
|
#4
|
|||
|
|||
A OK
Yo lo que hice fue contar las lineas que tenia una pagina, y con un contador sabia cuando estaba en una pagina o en otra. que me faltaban 10 lineas para acabar la pagina, y queria empezar en la siguiente pagina incrementaba el numero de linea. Lo malo es que necesitas un mismo tipo de fuente y al mismo tamaño todas las lineas. Un poco chapuzero. Pero si tu encuentras la manera, porfavor dila, que me interesaria. Gracias |
#5
|
|||
|
|||
He encontrado esta pagina en la que explica como hacer casi cualquier cosa bajo excel en delphi lo unico malo es que las explicaciones de los comandos debe estar en chino o vete tu a saber, pero como ponen los comando a hacer mas o menos se entiende, la pagina es esta:
http://delphi.cxc.cc/jiqiao/016.htm en concreto el comando que encontrado para hacer el salto de pagina (vere haber si ahi alguno mejor) es este: ExcelApp.WorkSheets[1].Rows[8].PageBreak := 1; |
|
|
|