Bonjour,
Toujours dans mes macros.
Je cherche à créer un style de dessin sous Impress via une Macro
J'ai un bout de code dans le livre Programmation OpenOffice et LO
Et j'essaye simplement de le faire tourner
j'ai recopié le bout de code, j'ai seulement changé le nom du style et
de son héritage
Dim monDocument As Object
Dim lesFamilles As Object, uneFamille As Object
Dim nouvStyle As Object
monDocument = ThisComponent
lesFamilles = monDocument.StyleFamilies
uneFamille = lesFamilles.getByName("graphics")
nouvStyle = monDocument.CreateInstance("com.sun.star.style.Style")
uneFamille.insertByName("Non Texte", nouvStyle)
nouvStyle.ParentStyle = "Text" ' hériter d'un style
J'ai un message d'erreur
Erreur d'exécution BASIC.
Une exception s'est produite :
Type: com.sun.star.lang.ServiceNotRegisteredException
Message: unknown service: com.sun.star.style.Style.
si quelqu'un peut me sortir de là
Merci
Pierre
--
Envoyez un mail à [email protected] pour vous désinscrire
Les archives de la liste sont disponibles à
https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy
