victorienC
XLDnaute Nouveau
Bonjour, je souhaiterais envoyer un fichier Excel par mail avec des tableaux TCD et des liens hypertextes dans ce tableau.
(J'ai utiliser la ligne suivante pour pouvoir mettre des lien hypertexte dans mon TCD sinon on peut pas)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count <> 1 Then Exit Sub
On Error Resume Next
Application.ActiveWorkbook.FollowHyperlink Address:=CStr(Target.Value), NewWindow:=True
End Sub
Sauf que lorsque je veux transférer mon Excel à une personne elle n'arrive pas à ouvrir les hypertextes (document pdf), alors que les pdf sont dans le même fichier que le Excel.
J'ai vu qu'il y avait un notion de lien hypertextes absolu et relatif et que les liens doivent être en relatif.
(J'ai utiliser la ligne suivante pour pouvoir mettre des lien hypertexte dans mon TCD sinon on peut pas)
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Cells.Count <> 1 Then Exit Sub
On Error Resume Next
Application.ActiveWorkbook.FollowHyperlink Address:=CStr(Target.Value), NewWindow:=True
End Sub
Sauf que lorsque je veux transférer mon Excel à une personne elle n'arrive pas à ouvrir les hypertextes (document pdf), alors que les pdf sont dans le même fichier que le Excel.
J'ai vu qu'il y avait un notion de lien hypertextes absolu et relatif et que les liens doivent être en relatif.