Bonjour le forum, et bonjour à toi au grand creepy
merci ca marche impec, dsl j'avais pas saisi sur l'instant la subtilité du chemin+nom de fichier
donc du coup si quelqu'un cherche un exemple de ce genre, c'est à dire créer des liens hypertext en fonction du contenu d'une cellule vers un fichier portant le même nom, et éviter de créer les liens vers les fichiers qu'on a pas, ca donne :
Dim i As Byte
'les noms de fichiers doivent etre dans la plage A1:A nb
For i = 2 To nb + 1
If Dir('c:\\mon dossier' & Cells(i, 1) & '.pdf') <> '' Then
ActiveSheet.Hyperlinks.Add Anchor:=Cells(i, 1), _
Address:='c:\\ mon dossier' & Cells(i, 1) & '.pdf'
End If
Next i
c'est pas long et ca marche du feu de dieu
bonne journée à tous et encore merci creepy!!!!!!!!!