Alle 02:25, venerdì 2 marzo 2007, Paolo Mantovani ha scritto: [....] > ecco un breve esempio: > > REM ***** BASIC ***** > > Sub Main > > 'colore da cercare e sostituire > MyCellBackColor = RGB(100,100,100) > > oSheet = ThisComponent.CurrentController.ActiveSheet > oCellFormatRanges = oSheet.getCellFormatRanges > oRangeEnum = oCellFormatRanges.createEnumeration > While oRangeEnum.hasMoreElements > oRange = oRangeEnum.nextElement > If oRange.cellbackColor <> MyCellBackColor Then
errata corrige: sostituire <> con = ciao paolo M --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
