Mmm, y a de l'idée, je regarde demain. Ça ne peut pas marcher tel quel mais
ça me met sur une piste. Je te tiens au courant.
Merci ! Et bonne fin de soirée,
Thierry
Le dim. 18 mars 2018 à 21:10, Jean-Francois Nifenecker <
jean-francois.nifenecker@laposte.net> a écrit :
Bonsoir Thierry,
Le 18/03/2018 à 19:41, Thierry Jeanneret a écrit :
J'ai cité le bouquin de Marcelly, qui est une bible sur laquelle je
m'appuie depuis des années. Mais malgré tout, je reste incapable
d'insérer par programme mes AutoTextes sans retour à la ligne ! Pire,
je ne trouve pas de point d'accrochage qui me permette de résoudre le
problème, qui semble pourtant trivial.
Donc, ça m'énerve, et prodigieusement, car nous avons un vrai filon
avec LibreOffice mais nous ne pouvons pas l'exploiter autrement qu'en
s'hyper-spécialisant sur cette suite. Encore une fois, c'est mon
ressenti.
As-tu essayé en :
1. créant un document Writer caché
Dim TheProps(0) As New com.sun.star.beans.PropertyValue
TheProps(0).Name = "Hidden"
TheProps(0).Value = True
TheDoc = StarDesktop.loadComponentFromURL("private:factory/swriter",
"_blank", 0, TheProps())
ce qui permet d'obtenir un curseur texte (je ne sais pas faire
autrement, il y a sûrement une meilleure manière)
2. créant un curseur texte sur le document
TheTextCursor = TheDoc.Text.CreateTextCursor
TheTextCursor.String = 'le texte à autotexter
3. récupérant l'objet groupe dans lequel insérer l'autotexte
4. ajoutant le texte du curseur comme autotexte dans le groupe ?
ZeAutoText = TheGroup.insertNewByName(TheShortcut, TheTitle, TheTextCursor)
Pas sûr que ça réponde à ta question, malgré tout...
Bien cordialement,
--
Jean-Francois Nifenecker, Bordeaux
--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour vous désinscrire
Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/
Tous les messages envoyés sur cette liste seront archivés publiquement et ne pourront pas être
supprimés
Context
Privacy Policy |
Impressum (Legal Info) |
Copyright information: Unless otherwise specified, all text and images
on this website are licensed under the
Creative Commons Attribution-Share Alike 3.0 License.
This does not include the source code of LibreOffice, which is
licensed under the Mozilla Public License (
MPLv2).
"LibreOffice" and "The Document Foundation" are
registered trademarks of their corresponding registered owners or are
in actual use as trademarks in one or more countries. Their respective
logos and icons are also subject to international copyright laws. Use
thereof is explained in our
trademark policy.