Bart Aimar ha scritto:

ho una macro che individua un range di celle e ne scrive la formula per farne la somma... ma mi sta dando problemi se usata su localizzazioni diverse.


Trovato... sul forum di OO un commento risolutivo di Villeroy...

' set formula works with english function-names in all enviroments

Quindi il codice funzionante su tutte le localizzazioni diventa:

Sub inserisci_somma
oSheet = ThisComponent.Sheets.getbyname(_
        thisComponent.CurrentController.activesheet.name)
oCell = thisComponent.currentselection
sCol = "G"
lrowE = 10
lrowI = 5

sFormula = "=SUM(" & sCol & lrowI & ":" & sCol & lrowE & ")"

'oCell.formulalocal = sFormula ' questa funzia solo su versione inglese

oCell.setformula (sFormula) ' così funzia su tutte le localizzazioni

end sub

La cosa pare estendibile a tutte le funzioni di OO...

ciao

Bart

__

Ovviamente nel pomeriggio l'ennesimo upgrade di UltimusFree
L'applicativo per Computi Metrici Estimativi su tabelle Calc.
http://aimar.mrjive.it

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a