2009/1/8 Michele Zarri <[email protected]> > Ciao, > > Non sapendo niente di macro non e' la cosa piu' banale da fare. > > La macro che ti serve e' questa: > > Sub MultiplyAndRoundActiveCellValue() > Dim dFactor, dResult As Double > Dim oSel > > dFactor = 1.1 > oSel = ThisComponent.getCurrentController().getSelection() > dResult = Format(oSel.getValue()*dFactor, "0.0" ) > oSel.setValue(dResult) > End Sub >
grazie, stasera la provo ! ff77
