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
(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
tu peux tester cette macro dans ton classeur , pour créer les liens dans la colonne B
Code:
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
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