Activer plusieurs liens hypertexte messagerie

Choupinette418 Messages postés 2 Date d'inscription Statut Membre Dernière intervention -
Choupinette418 Messages postés 2 Date d'inscription Statut Membre Dernière intervention - 7 oct. 2016 à 16:35

Bonjour,

Je ne connais rien au VBA, mais je suis en mesure de copier-coller un code :D

J'ai un fichier avec énormément de lignes, incluant des adresses courriels, généré à partir de Salesforce... Les adresses courriel ne sont pas activées, à moins que je ne double-clique dessus chaque fois...

Existe-t-il un moyen plus rapide de transformer ma colonne B en liens hypertexte directement?

Merci!!

Afficher la suite

1 réponse

Réponse 1 / 1
Zoul67 Messages postés 2001 Statut Membre 149
Bonjour Choupinette (?!)
```
Sub essai()
    While ActiveCell.Value <> ""
        ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:="mailto:" & ActiveCell.Value
        ActiveCell.Offset(1, 0).Select
    Wend
End Sub
```
A+
1
1. Choupinette418 Messages postés 2 Date d'inscription Statut Membre Dernière intervention
  
  OH WOW!!!!!!!!!! MERCI X200000000000000000 :)
  
  0

Activer plusieurs liens hypertexte messagerie

1 réponse

Discussions similaires

Newsletters