Hola
No consigo encontrar la forma de poder formatear unas celdas como moneda desde
basic.
He buscado en Internet, en los manuales de Mauricio y Andrew, pero soy incapaz
de conseguirlo.
He probado con format, pero no funciona, o lo hago mal, no se.
Pongo a continuación el código donde quiero que formatee la celda.
Function Anegreta ( oRangSelect as String, oMidaFont as Integer, oTipusFont as
Integer, oPosicio as Integer, oSheet as Object, oDoc as Object)
Dim oRang as Object
oRang = oSheet.getCellRangeByName( oRangSelect )
oDoc.getCurrentController.select(oRang)
oRang.CharHeight = oMidaFont
oRang.CharWeight = oTipusFont
oRang.HoriJustify = oPosicio
End Function
Si alguien puede ayudarme os lo agradeceré.
Saludos
Pere
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
