carloslmm wrote:Hola Joseluis
Gracias por compartir tu experiencia, seria posible me ayudaras como cambiar color de celda letras etc., estoy realizando algo similar con una informacion
y al enviar generar el archivo en excell me indica que no es correcto mas sin embargo lo abre y aparece la informacion
si es posible te agradecería de antemano y si me puedes mandar los comandos a mi correo, seria carloslmm@hotmail.com y carloslmm10@gmail.com
o la ayuda que me puedas brindar
Carlos I. De La Rosa
Gracias
Uso fwh 12.04 borland 5.82
/*
* TExcelScript():FormatRange()
*/
METHOD FormatRange( cRange , cFont , nSize , lBold , lItalic , nAlign , nFore , nBack , nStyle , cFormat , lAutoFit )
LOCAL oRange
oRange := ::oSheet:Range( cRange )
IIF( cFont == Nil , , oRange:Font:Name := cFont )
IIF( nSize == Nil , , oRange:Font:Size := nSize )
IIF( lBold == Nil , , oRange:Font:Bold := lBold )
IIF( lItalic == Nil, , oRange:Font:Italic := lItalic )
IIF( nFore == Nil , , oRange:Font:Color := nFore )
IIF( nBack == Nil , , oRange:Interior:Color := nBack )
IIF( cFormat == Nil, , oRange:Set("NumberFormat",cFormat) )
IIF( nStyle == Nil , , oRange:Borders():LineStyle := nStyle )
IIF( nAlign == Nil , , oRange:Set("HorizontalAlignment",Alltrim(Str(nAlign))) )
IIF( lAutoFit == Nil , , oRange:Columns:AutoFit() )
RETURN ( Nil )
compubrion wrote:Saludos !
Puedes compartir la clase ?
carloslmm wrote:Jose Luis Contodo gusto
Descargue una clase que descargue indicame tu correo y te la mando con todo gusto
Carlos De La Rosa
carloslmm@hotmail.com
fwh 12.04 harbour borland 5.8
AngelSalom wrote:Si pudieras enviármela, ¡gracias! angel@sigev.com
Return to FiveWin para Harbour/xHarbour
Users browsing this forum: No registered users and 26 guests