Pour rendre les URLs cliquables dans un texte en utilisant Writer de LibreOffice, suivez ces étapes :

1. Ouvrir le Document : Lancez LibreOffice Writer et ouvrez le document contenant les URLs que vous souhaitez rendre cliquables.

2. Sélectionner l'URL : Mettez en surbrillance l'URL que vous souhaitez rendre cliquable.

3. Insérer un Lien Hypertexte :

   • Allez dans le menu Insertion.
   • Sélectionnez Lien hypertexte (ou utilisez le raccourci clavier Ctrl + K).

4. Configurer le Lien Hypertexte :

   • Dans la fenêtre qui s'ouvre, assurez-vous que l'URL est correctement saisie dans le champ URL.
   • Cliquez sur Appliquer puis sur Fermer.

5. Vérifier le Lien : Assurez-vous que l'URL est maintenant cliquable en passant la souris dessus (le curseur devrait changer pour indiquer un lien cliquable).

6. Répéter pour d'autres URLs : Répétez les étapes 2 à 5 pour chaque URL que vous souhaitez rendre cliquable.

En suivant ces étapes, vous devriez pouvoir rendre toutes les URLs de votre document cliquables dans LibreOffice Writer.

Pour traiter automatiquement les URLs dans un document LibreOffice Writer et les rendre cliquables, vous pouvez utiliser une macro. Voici comment procéder :

1. Ouvrir l'Éditeur de Macros :

   • Allez dans le menu Outils.
   • Sélectionnez Macros.
   • Cliquez sur Organiser les macros.
   • Choisissez LibreOffice Basic.

2. Créer une Nouvelle Macro :

   • Dans l'éditeur de macros, cliquez sur Nouveau.
   • Donnez un nom à votre macro, par exemple ConvertURLsToHyperlinks.

3. Écrire le Code de la Macro :

   • Copiez et collez le code suivant dans l'éditeur de macros :

basic
Copy
Sub ConvertURLsToHyperlinks
    Dim oDoc As Object
    Dim oText As Object
    Dim oCursor As Object
    Dim oTextPortion As Object
    Dim sText As String
    Dim sURL As String
    Dim iStart As Integer
    Dim iEnd As Integer

    oDoc = ThisComponent
    oText = oDoc.Text
    oCursor = oText.createTextCursor()

    ' Expression régulière pour détecter les URLs
    Dim oRegEx As Object
    oRegEx = CreateObject("VBScript.RegExp")
    oRegEx.Pattern = "(https?://[^\s]+)"
    oRegEx.Global = True

    oCursor.gotoStart(False)
    oCursor.gotoEnd(True)

    sText = oCursor.getString()

    Dim oMatches As Object
    Set oMatches = oRegEx.Execute(sText)

    Dim oMatch As Object
    For Each oMatch In oMatches
        sURL = oMatch.Value
        iStart = oMatch.FirstIndex
        iEnd = iStart + Len(sURL)

        oCursor.collapseToStart()
        oCursor.goRight(iStart, False)
        oCursor.goRight(iEnd - iStart, True)

        oTextPortion = oCursor.Text
        oTextPortion.HyperLinkURL = sURL
    Next oMatch
End Sub

4. Exécuter la Macro :
   • Fermez l'éditeur de macros.
   • Allez dans le menu Outils.
   • Sélectionnez Macros.
   • Choisissez Exécuter une macro.
   • Sélectionnez la macro ConvertURLsToHyperlinks et cliquez sur Exécuter.

Cette macro parcourra le document, détectera les URLs et les convertira en liens hypertextes cliquables. Assurez-vous de sauvegarder votre document avant d'exécuter la macro pour éviter toute perte de données.