[Résolu][Math] Insertion de texte directement

[art2611]

Bonjour,

Dans le cadre d'un projet, j'aimerais pouvoir créer des macros permettant d’insérer du texte directement dans la boite de dialogue du module math, pour ensuite créer des raccourcis claviers créant par exemple directement le symbole somme etc..
Cependant bien que la création de macro écrivant directement dans le document soit possible simplement via "Enregistrer une macro, enregistrer la macro n'est pas possible lorsque l’éditeur de formule est ouvert.

Avez vous des solutions s'il vous plait ou du moins des pistes ? Je n'ai pas trouvé ailleurs la réponse à ma question.

Je vous remercie d'avance,

Cordialement.

[Hubert Lambert]

Bonjour, et bienvenue sur le forum,

Un petit exemple :

Code : Tout sélectionner

sub ajoute_somme()
    insere_formule("sum from 1 to 10 n^2")
end sub

sub insere_formule(formule)
    math = thiscomponent
    if not math.supportsService("com.sun.star.formula.FormulaProperties") then
        math = math.CurrentSelection.EmbeddedObject.Component
    end if
    math.Formula = math.Formula + " " + formule
end sub

Cette macro fonctionne si l'éditeur de formule est ouverte ou lorsqu'une formule est sélectionnée dans le document. La macro "ajoute_somme" peut être affectée à une barre d'outils personnalisée ou à un raccourci clavier.
À noter que, s'il s'agit d'insérer des formules complètes (et non des portions de formule), l'autotexte peut être une option plus simple.
Cordialement.

[art2611]

Bonjour,

Merci beaucoup pour votre réponse aussi rapide, cette macro fonctionne presque à merveille, c'est exactement ce que je souhaitais pouvoir faire !

J'ai cependant un petit problème encore, lorsque j’exécute la macro depuis Outils>Macros>Exécuter la macro, je peux l’exécuter comme vous le disiez si une formule est sélectionnée ou bien si je suis dans l'éditeur d'équation mais lorsque j'attribue la macro à un raccourci clavier, je peux l'exécuter uniquement lorsqu'une formule est sélectionnée mais plus lorsque je suis dans l'éditeur d'équation

Si jamais vous avez une solution pour palier à ce problème ce serait parfait ! Merci,

Cordialement,

[Hubert Lambert]

Je pense qu'il faut également définir le raccourci au niveau du module Math.
Donc ouvrir ce module indépendamment de Writer, définir le raccourci, fermer Math et revenir dans Writer.
Cordialement.

[art2611]

En effet, ça fonctionne !!! Merci beaucoup, bonne continuation et peut être à bientôt sur ce forum

[Hubert Lambert]

Juste une dernière chose : pourrais-tu baliser le premier message avec le module concerné et avec "résolu" (cf. bandeau rouge)?
Merci.

[Bidouille]

et avec "résolu" (cf. bandeau rouge)

A priori le bandeau n'a pas été lu.
Titre modifié à votre place.