bonsoir,

j'ai une erreur sur ce code, pouvez vous m'aider svp,
enfaite c'est depuis que j'ai mis la variable textbox5.value dans le chemin d'accès que ca ne marche plus, je comprends pas pourquoi ???

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Private Sub textBox5_dblClick(ByVal Cancel As MSForms.ReturnBoolean)
 
   'Text = "D:\Documents\h.gharsalli\Desktop\" & TextBox5.Value & ".pdf"
     ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
             "D:\Documents\h.gharsalli\Desktop\" & TextBox5.Value & ".pdf", TextToDisplay:=Selection
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
    Unload Me
End Sub