Faq/Writer/167

    From The Document Foundation Wiki
    < Faq‎ | Writer
    This page is a translated version of the page Faq/Writer/167 and the translation is 100% complete.

    Hoe maak ik een sneltoets voor een speciaal teken?

    Met Extra ▸ Aanpassen ▸ tab Toetsenbord kun je een sneltoets alleen toekennen aan het opstarten van het commando Invoegen ▸ Special teken.

    Maar het kan wel op een paar andere manieren.

    Met AutoCorrectie

    1. Extra ▸ Opties voor AutoCorrectie ▸ tab Vervangen
    2. voeg in de box Vervangen de tekens in die je wilt vervangen door een special teken
    3. rechtsklik in de box Door, kies dan Speciaal teken en selecteer dat teken (je kunt het ook plakken als je het net al gekopieerd hebt)
    Note pin.svg

    NB:
    Hier moet de te vervangen tekst geen onderdeel zijn van een ander woord.

    AutoTekst aanmaken

    1. voeg het speciale teken toe in een document
    2. selecteer het teken, Extra ▸ AutoTekst
    3. kies de categorie voor deze AutoTekst (bijvoorbeeld Mijn AutoTekst)
    4. kies een naam en een sneltoets
    5. klik op de knop AutoTekst, kies de lijstkeuze Nieuw
    6. sluit het dialoogvenster
    Note pin.svg

    NB:
    Als bij AutoCorrectie, de sneltoets moet geen onderdeel zijn van een woord. Je kunt dit in AutoText echter negeren door de sneltoets te selecteren voor de toets F3 te gebruiken (zie de NB. in deze beschrijving).

    Met een macro

    Je kunt het invoegen van een speciaal teken door een macro laten doen (Extra ▸ Macro's ▸ Macro opnemen) zonder dat je hoeft te kunnen programmeren.[1]. Wijs dan de macro toe aan de gekozen sneltoets.

    De voordelen hiervan zijn:

    • het toevoegen is beperkt tot de sneltoets, het gebruikt geen vervangen van woorden zoals bij AutoTekst en AutoCorrectie
    • je kunt de sneltoets voor meerdere componenten gebruiken

    Voorbeeld van een opgenomen macro:

    sub InsertCharSpec
    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 = "Times New Roman"
    
    dispatcher.executeDispatch(document, ".uno:InsertSymbol", "", 0, args1())
    
    end sub

    NB:

    1. Als dit commando niet beschikbaar is dan kun je het activeren met Extra ▸ Opties ▸ LibreOffice ▸ Geavanceerd