• [^] # Re: racourci clavier pour afficher un caractere

    Posté par (site web personnel) . En réponse au journal OpenOffice 2.0 pour Mars. Évalué à 5.

    Tu lance l'enregistreur de macro.
    Tu insère ton caratere spécial
    Tu termine l'enregistrement
    Tu enregistre ta macro dans "standart"
    Tu assigne une combinaison de touche via Outil/Macro puis Assigner

    pour info voici une macro qui insère un o barré (à la danoise)

    sub Inserechar
    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(1) as new com.sun.star.beans.PropertyValue
    args1(0).Name = "Symbols"
    args1(0).Value = "Ø"
    args1(1).Name = "FontName"
    args1(1).Value = "Larabiefont"

    dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, args1())


    end sub


    le racourci clavier est stocké dans
    ~/ton_rep_de_config_OpenOffice/user/config/soffice.cfg/writerkeybinding.xml
    sous la forme (ici ctrl-q) :
    <accel:item accel:code="KEY_Q" accel:mod1="true" xlink:href="macro:///Standard.Module1.Inserechar()"/>