Bonjour,
Merci de cette information. Je vais tenter de réactiver le bug, on ne
sait jamais. Et je vais évaluer l'utilisation de la correction
automatique, qui était à l'origine utilisée par l'application Word que
je suis en train de remplacer.
Bonne fin de journée,
Thierry
Le 25.02.18 à 11:51, ROYER Jean-Yves a écrit :
Le 25/02/2018 à 10:59, Didier Dorange-Pattoret a écrit :
Bonjour,
Peut-être que les autotextes téléchargés contiennent tous un retour
ligne.
Pour vérifier, il suffit d'un éditer un. (Outils -> Autotextes ou
Ctrl+F3).
Cordialement.
Le 25/02/2018 à 10:46, Thierry Jeanneret a écrit :
Bonjour à vous,
Voici qu'il m'a pris l'envie de charger un groupe d'auto-textes à
partir d'une table de base de données. Tout se passe parfaitement
bien, je retrouve mes petits avec leur clé d'accès, libellé court et
texte de remplacement, tout bien.
Par contre lorsque je les utilise, j'obtiens systématiquement un
retour à la ligne après le texte de remplacement. Quelqu'un a-t-il
une idée ?
C'est une bogue que j'ai toujours connue (avant 2006) et qui ne doit pas
être compliquée à corriger. Le saut de paragraphe est ajouté à tous les
autotextes en texte brut. Ceci interdit cette fonction pourtant pratique
pour éviter de polluer un document avec des surcharges locales si le
texte doit être préformaté.
Voir par exemple
https://bugs.documentfoundation.org/show_bug.cgi?id=53023, JBF signalant
en 2012 que cette bogue existait déjà dans la version Ooo 2.
C'est ce genre de truc qui rend le logiciel très vulnérable face à la
concurrence, car c'est insupportable.
Lorsque j'utilise d'autres auto-textes, livrés avec LibreOffice, tout
se passe correctement et le curseur reste bien sagement à côté du
dernier caractère inséré.
Merci d'avance si vous pouvez me mettre sur une piste.
Thierry
_Annexes_ :
*Code de la fonction d'insertion*
' Une entrée AutoText se compose de :
' - Le code saisi par l'utilisateur - CodeFourniture
' - Un titre résumant le contenu de remplacement - Désignation
' - Le contenu de remplacement - Désignation &
PrixUnitaire,
Sub StoreAutoText(sDesignation As String, sPrixUnitaire As String,
sCodeFourniture As String)
DIM oGroup As Object
Dim oEntry As Object
Dim oTextRange As Object
' Définition du texte de remplacement. Par rapport à la désignation,
j'ajoute le prix pour
' l'exploiter ensuite par une macro.
oTextRange = createUnoService("com.sun.star.text.TextRange"
oTextRange.String = sDesignation & " " & sPrixUnitaire
oGroup = oAutoTextContainer.getByName(sAutoTextGroupName)
oEntry = oGroup.insertNewByName(sCodeFourniture, sDesignation,
oTextRange )
End Sub
*Info LibreOffice*
Version: 5.4.5.1
Build ID: 79c9829dd5d8054ec39a82dc51cd9eff340dbee8
Threads CPU : 8; OS : Mac OS X 10.13; UI Render : par défaut;
Locale : fr-CH (fr_CH.UTF-8); Calc: group
--
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.