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.sa...@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 <cleyf...@gmail.com> a écrit : >>>> >>>> Le mar. 24 juil. 2018 à 08:45, Thierry Jeanneret < >>>> thierry.jeanne...@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+unsubscr...@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+unsubscr...@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+unsubscr...@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
