Private Sub ListBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
chemin = "P:\" 'la variable n'étant pas public, il faut la répéter
fichier_select = Me.ListBox1.Value 'assigner à la variable fichier_select le fichier qui est 'double cliqué'
ThisWorkbook.FollowHyperlink chemin & fichier_select 'ouvrir le fichier comme un hyper lien
'fermer le user form
Me.Hide
End Sub