finalisation d'une macro

M

marc

Guest
Bonjour,

je suis sur le point de finir ma première macro :) , mais je tourne en rond :(

la macro est la suivante:

Sub supertexte()

For Each Cell In ActiveSheet.Range("b:b")
If Cell.Value = "" Then Exit For
ActiveSheet.Hyperlinks.Add Anchor:=Cell, Address:="c:/doc1/" + Cell.Value, _
TextToDisplay:=Cell.Value
Next Cell
End Sub

le probleme est que le lien hypertexte créé commence par file:// ce que je n'arrive pas à enlevé

merci d'avance

marc
 

Discussions similaires

Réponses
7
Affichages
321
Réponses
19
Affichages
2 K

Statistiques des forums

Discussions
312 196
Messages
2 086 095
Membres
103 116
dernier inscrit
kutobi87