finalisation d'une macro

[marc]

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

 

[wally]

Bonsoir marc et le forum,

Essaye avec des "\" dans le paramètre Address :

Address:="c:\doc1\" + Cell.Value


@+

wally