Bonjour Voici une nouvelle question envoyée à l'aide du formulaire de demande d'aide (http://fr.libreoffice.org/get-help/poser-une-question/). Si vous répondez, merci de penser à utiliser la fonction "répondre à tous" de votre logiciel de courrier électronique de façon que le demandeur reçoive une copie de votre réponse.
Email:: [email protected] Sujet:: macro OS:: Linux Version:: 6.1.x Question:: J'ai enregistré une macro : insertion d'un caractère spécial puis mise en gras et mise en couleur... mais quand j'exécute la macro, l'insertion du caractère se fait mais pas la mise en forme. Pourtant dans la macro l'ensemble des demandes est enregistré... voici la macro en question... sub Main rem ---------------------------------------------------------------------- rem define variables dim document as object dim dispatcher as object rem ---------------------------------------------------------------------- rem get access to the document document = ThisComponent.CurrentController.Frame dispatcher = createUnoService("com.sun.star.frame.DispatchHelper") rem ---------------------------------------------------------------------- dim args1(0) as new com.sun.star.beans.PropertyValue args1(0).Name = "Text" args1(0).Value = " " dispatcher.executeDispatch(document, ".uno:InsertText", "", 0, args1()) rem ---------------------------------------------------------------------- dim args2(1) as new com.sun.star.beans.PropertyValue args2(0).Name = "Symbols" args2(0).Value = "†" args2(1).Name = "FontName" args2(1).Value = "Liberation Serif" dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, args2()) rem ---------------------------------------------------------------------- rem dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, Array()) rem ---------------------------------------------------------------------- dim args4(0) as new com.sun.star.beans.PropertyValue args4(0).Name = "Bold" args4(0).Value = true dispatcher.executeDispatch(document, ".uno:Bold", "", 0, args4()) rem ---------------------------------------------------------------------- dim args5(0) as new com.sun.star.beans.PropertyValue args5(0).Name = "Color" args5(0).Value = 255 dispatcher.executeDispatch(document, ".uno:Color", "", 0, args5()) end sub quelqu'un sait-il ou est le problème??? merci Gilles -- 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
