Date: prev next · Thread: first prev next last
2018 Archives by date, by thread · List index


Hello, 

Ca semble être pour Calc, pas pour Writer. Ce dernier est structuré de manière très différente, je 
ne pense pas que ce soit transposable tel quel.

Thierry

Le 24 juil. 2018 à 13:33, sandy andriant <andriant.sandy@gmail.com> a écrit :

Dans un autre topic, on propose la macro suivante :
https://forum.openoffice.org/fr/forum/viewtopic.php?f=4&t=47346#p257401

REM  *****  BASIC  *****

    Sub RenommerHyperliens
' Merci spYre : http://user.services.openoffice.org/fr/forum/viewtopic.php?p=84431#p84431
    Dim oDoc as Object, oFeuille as Object, oCellule as Object
    Dim oHyperlien
    Dim a as Integer, b as Integer

    oDoc = ThisComponent
    oFeuille = oDoc.sheets.getbyName("Feuille1") ' par exemple...
    For a = 0 to 25
       For b = 0 to 99
          oCellule = oFeuille.getcellbyPosition(a,b) 'passe en revue les cellules de la matrice 
A1:Z100

          If  oCellule.TextFields.Count = 1 Then  'vérifie la présence d'un champ texte

             REM --- Récupération du champ :
             oHyperlien = oCellule.getTextFields.getbyIndex(0)

             REM --- Modification de la propriété "Representation", qui est le texte du champ, 
par l'adresse URL du champ
oHyperlien.setPropertyValue("Representation",oHyperlien.URL)
          EndIf
       Next b
    Next a

    End Sub

Cordialement
Sandy-Pascal Andriant

Le 24/07/2018 à 13:28, sandy andriant a écrit :
Bonjour,

Trouvé ce topic qui pourrait aider éventuellement (derniers messages)
https://forum.openoffice.org/fr/forum/viewtopic.php?f=4&t=15203&hilit=hypertexte 

Cordialement
Sandy-Pascal Andriant

Le 24/07/2018 à 10:23, Thierry Jeanneret a écrit :
Ca, c'est le désagrément des conversations partiellement privées. Christophe me l'avait fait 
remarquer il y a deux heures, merci !

Ce qui m'énerve le plus, c'est qu'il y a quelques temps j'ai écrit une solution permettant de 
valider les hyper-liens de documents. Le demandeur
Avait une quarantaine de documents writer, assez copieux, avec chacun quelques 
dizaines/centaines de références, dont certaines étaient mortes.
J'ai donc parcouru le domaine en long et en large.

Vieillir est un naufrage, je confirme :-]

Thierry


Le 24 juil. 2018 à 10:09, Cley Faye <cleyfaye@gmail.com> a écrit :

Le mar. 24 juil. 2018 à 08:45, Thierry Jeanneret <
thierry.jeanneret@gmail.com> a écrit :

Bonjour,

C'était un test pour vérifier que lorsqu'on a un marteau, tout n'est que
clou ? C'est réussi !

Utilisez la fonction Edition - Rechercher & Remplacer de LibreOffice, ça
marche très bien, pas besoin de sed.

- Rechercher : http:
- Remplacer  : https:
- Tout Remplacer

Et l'affaire est faite, après avoir fait une sauvegarde de votre document,
bien entendu, on ne sait jamais.

Thierry

​Félicitation, votre clou est bien entré dans le pas de vis :)
Cette méthode ne remplace pas les liens, uniquement le texte visible. Il
n'y aurait pas vraiment de discussion si c'était aussi immédiat.​

-- 
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/
Privacy Policy: https://www.documentfoundation.org/privacy




-- 
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/
Privacy Policy: https://www.documentfoundation.org/privacy


-- 
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/
Privacy Policy: https://www.documentfoundation.org/privacy

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.