[VBA] Extraire les liens hyperlink d'un docx
Sub ExtractUrlsFormatAndRemoveHyperlinks() Dim doc As Document Set doc = ActiveDocument Dim hyperlink As Hyperlink Dim rng As Range Dim fullAddress As String ' Parcourir chaque hyperlien dans le document pour insérer l'URL complète au début du paragraphe...
/image%2F0881799%2F20140610%2Fob_a8c7fe_logo2.jpg)