Bon ben voilà, du coup, ça marche. Moi qui pensais y passer des heures...
Merci beaucoup.
Mais du coup, je deviens gourmand.
Je voudrais bien remplir le champ "titre" et je mets le titre dans un
tableau.
Or, je crois que les styles dans les tableaux ne sont pas parcourus par
ce programme.
J'ose à peine demander comment y accéder...
Pierre
Le 01/05/2017 à 18:26, Jaccomard a écrit :
Un exemple, où doc4 est le document actif :
listePargr=doc4.Text.createEnumeration
i=0
nbint=0
'Analyse du document
Do While listePargr.hasMoreElements
elmt=listePargr.nextElement
if elmt.supportsService("com.sun.star.text.Paragraph") Then
msgbox("Style:"+elmt.paraStyleName+" -
contenu:"+elmt.String)
if ((elmt.paraStyleName="Heading 3") or
(elmt.paraStyleName="Heading 2") or (elmt.paraStyleName="Heading 1"))
then
........
End if
end if
Loop
doc4.close(True)
A noter que dans les macros, les noms des catégories des styles sont
en anglais ("Heading 1", etc.)
Cordialement,
O.J.
P.S:xRay est effectivement une aide utile, comme l'a suggéré Didier.
Le 01/05/2017 à 17:27, Pierre Choffardet a écrit :
Le 01/05/2017 à 17:09, Didier Dorange-Pattoret a écrit :
Bonjour Pierre,
L'outil Xray permet facilement de connaître les différentes
propriétés d'un document.
effectivement, j'ai téléchargé l'outil, puis fait XRay sur un objet
ThisComponent
Puis dans la méthode, getDocumentProperties
J'ai trouvé :
Title Subject Description Keywords
Ce qui semble correspondre à mes besoins. Je verrai si c'est bien ça
Merci !
Il y a aussi MRI.
Pour un document Writer, il y a le tableau de propriétés StyleFamilies
J'espère ne pas répondre à côté.
Cordialement.
Le 01/05/2017 à 16:54, Pierre Choffardet a écrit :
Bonjour,
Aux pros du BASIC.
Je voudrais écrie une petite macro qui fera le boulot suivant :
- Parcourir un document Writer paragraphe par paragraphe.
- récupérer le style du paragraphe
- Si le style est Titre1, mettre le contenu du paragraphe de côté
- écrire le résultat dans les propriétés du document Onglets >
description, champs > Commentaire
Je ne vois pas comment accéder aux propriétés du document
(Fichier/Propriétés)
Un petit coup de main svp...
Pierre
---
L'absence de virus dans ce courrier électronique a été vérifiée par le
logiciel antivirus Avast.
https://www.avast.com/antivirus
--
Envoyez un mail à users+unsubscribe@fr.libreoffice.org pour savoir comment vous désinscrire
Les archives de la liste sont disponibles à http://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.