L’astuce soumise par: Jay Shukla Parfois, nous avons une situation comme:

{vide} 1. Site Web Yahoo www.yahoo.com 2. Site Web Google www.google.com Alors, comment séparer le nom du site Web du texte restant.

Étape 1.

Sélectionnez la colonne.

Aller à l’option Remplacer sous Modifier puis remplacer http:

avec (espaces) …​…​…​…​…​…​…​…​. http:

(Par exemple: …​. = Espaces)

Vous constaterez que les noms de nous sont séparés à une distance Étape 2 Aller à l’option Texte dans la colonne sous Données et sélectionnez l’option Largeur fixe obtenir le marqueur à un emplacement spécifique où dans la colonne avant le nom du premier site Web dans toute la colonne, cliquez sur Suivant vous verrez que le texte avant les noms de sites Web soit en noir FINI Vous trouverez vos noms de sites Web séparés du texte.

Maintenant, pour en faire un hyperlien:

Étape 1 Appuyez sur Alt + F11, vous constaterez qu’une macros ouvrira Goto Insert, puis sélectionnez Module.Une autre nouvelle fenêtre de module apparaît. Étape 2 Copiez collez la formule ci-dessous:

—————————————————— Sub MakeHyperlinks_D()

Dim cell As Range, Rng As Range Set Rng = Range(« A1:A » & Cells.Rows.Count). _ SpecialCells(xlConstants, xlTextValues)

If Rng Is Nothing Then MsgBox « nothing in range »

Exit Sub End If For Each cell In Rng If Trim(cell.Value) <> «  » Then ActiveSheet.Hyperlinks.Add Anchor:=cell, _ Address:=cell.Value, _ ScreenTip:=cell.Value, _ TextToDisplay:=cell.Value End If Next cell End Sub —————————————————– and then Goto File Close and Exit Step 4 Goto Tools>Macros>Macros you will find your Websites hyperlinked.

SIMPLE AND RAW BUT EFFECTIVE.

Jay.