FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour Ayuda con TExcelScript()
Posts: 10
Joined: Sun Aug 07, 2011 07:24 PM
Ayuda con TExcelScript()
Posted: Tue Aug 30, 2011 09:53 PM

Hola amigos del foro

Desearia saber com puedo hacer la union de varias celdas usando TExcelScript() para que al colocar un texto en dicha celda quede centrado...
No se como decirlo de otra forma, espero que me entiendan...

Ademas, como usar colores para el texto y para el fondo de la celda

Gracias

Posts: 1364
Joined: Wed Jun 21, 2006 12:39 AM
Re: Ayuda con TExcelScript()
Posted: Tue Aug 30, 2011 10:11 PM
A ver si te sirve

Code (fw): Select all Collapse
 cRango := cMakeRange( 11, 5, 13, 5 ) //esta función devuelve un rango de celdas en formato An:Bn
:Combinar( cRango )  // combina las celdas contenidas en cRango
:oSheet : Cells( 11, 5 ) : Set( "VerticalAlignment", '2' ) // Alinea verticalmente el texto
:MultiLine( 11, 5 ) // le indico que la celda es multilinea
:Say( 11, 5, 'Cargo y Código', 'Arial', 10, .t.,,,3,,,,1 )

Saludos
Posts: 10
Joined: Sun Aug 07, 2011 07:24 PM
Re: Ayuda con TExcelScript()
Posted: Tue Aug 30, 2011 10:15 PM

Gracias amigo

Una pregunta mas. Como puedo variar la letra del header que he agregado usando oExcel:Headers( 1 , 'TITULO...' )

Gracias...

Continue the discussion