Bonjour
claude-2 wrote
> J'aimerais vérifier avec la macro l'affichage des formule et même mieux le
> forcer.
Ci-dessous un exemple qui commence par tester et afficher la valeur
courante de l'option puis qui force en affichage Excel L1C1.
Nota : l'interface ne propose pas toutes les valeurs listées sur la doc
IDL...
Cordialement
Pierre-Yves
option explicit
sub TesterConf
dim oFormulaSyntax as object
globalScope.basicLibraries.loadLibrary("Tools")
oFormulaSyntax =
getRegistryKeyContent("org.openoffice.Office.Calc/Formula/Syntax", true)
if oFormulaSyntax.hasByName("Grammar") then
select case oFormulaSyntax.grammar
case com.sun.star.sheet.AddressConvention.UNSPECIFIED
msgbox "Non spécifié...", 64, "Syntaxe des formules"
case com.sun.star.sheet.AddressConvention.OOO
msgbox "Calc A1", 64, "Syntaxe des formules"
case com.sun.star.sheet.AddressConvention.XL_A1
msgbox "Excel A1", 64, "Syntaxe des formules"
case com.sun.star.sheet.AddressConvention.XL_R1C1
msgbox "Excel L1C1", 64, "Syntaxe des formules"
case com.sun.star.sheet.AddressConvention.XL_OOX
msgbox "Excel OOX", 64, "Syntaxe des formules"
case com.sun.star.sheet.AddressConvention.LOTUS_A1
msgbox "LOTUS_A1", 64, "Syntaxe des formules"
case else
msgbox "Configuration non prévue...", 16, "Syntaxe des
formules"
end select
else
msgbox "Configuration non prévue...", 16, "Syntaxe des formules"
end if
oFormulaSyntax.setPropertyValue("Grammar",
com.sun.star.sheet.AddressConvention.XL_R1C1)
oFormulaSyntax.commitChanges
end sub
--
View this message in context:
http://nabble.documentfoundation.org/Re-Fwd-fr-users-Re-calc-macro-propriete-formulalocal-tp4127497p4127567.html
Sent from the Users mailing list archive at Nabble.com.
--
Envoyez un mail à [email protected] pour savoir comment vous
désinscrire
Les archives de la liste sont disponibles à
http://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne
pourront pas être supprimés
