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
 
W

wally

Guest
Bonsoir marc et le forum,

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

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


@+

wally
 

Discussions similaires


Haut Bas