grand nombre de liens hypertextes

[Fabrice]

Bonjour,

Je souhaite créer un lien hypertexte pour chacun des fichiers d'un dossier.

Mon dossier contien 1431 fichiers de tout type et ce serait long et fastidieux de créer tous ces liens hypertextes à la main.
Existe-t-il un moyen de créer ces liens par macro, copier-coller spécial ... etc ... ?

J'ai réussi à créer le chemin complet de chacun de ces fichiers (en les listant en MS-DOS et en les récupérant sur Excell) mais je n'arrive pas à convertir ces cases 'texte' en liens hypertextes.
le fichier Excell des cases texte est joint : liens.zip

Merci [file name=liens.zip size=2414]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/liens.zip[/file]

 

[Fabrice]

(re)Bonjour,
J'ai bien trouver sur ce site de quoi faire des listes de fichiers contenus dans tel répertoire, ou telle liste de répertoires,
mais rien pour convertir cette liste de noms de fichiers en liste de liens hypertextes !
Qqun peut-il m'aider ?
Merci,
Fabrice
http://photo.fabricechancel.free.fr

 

[MichelXld]

bonsoir Fabrice

tu peux tester cette macro dans ton classeur , pour créer les liens dans la colonne B

Sub liensHypertextes()
Dim Cell As Range

For Each Cell In Range('A1:A' & Range('A65536').End(xlUp).Row)
ActiveSheet.Hyperlinks.Add Anchor:=Cell.Offset(0, 1), Address:=Cell
Next Cell

End Sub

bonne soiree
MichelXld

 

[Fabrice]

Bonjour,
j'ai essayé ça ... ça marche !
c'est génial ça va me faire gagner un temps énorme !
UN TRES GRAND MERCI !!!!
Fabrice
http://photo.fabricechancel.free.fr