Activer les liens hypertextes dans une listbox

Question

Cela fait un petit moment que je cherche une solution à mon problème mais malheureusement sans succès. En effet, j'ai une listbox que j'alimente avec le code ci-dessous. Dans cette dernière, la cinquième colonne "Cells(i, 5)" contient des liens hypertextes, je voudrais savoir si il y a moyen de les activer dans la listbox ce qui m’évitera de passer par la feuil Excel à chaque fois que je dois ouvrir un fichier. Dans l'attente de vos réponses, je vous remercie d'avance pour votre aide. Vincent Ci-joint le fichier Excel Private Sub CommandButton1_Click() UserForm1.ListBox1.Clear UserForm1.ListBox1.ColumnCount = 5 For i = 1 To Range("A65536" ).End(xlUp).Row If Not Rows(i).Hidden Then UserForm1.ListBox1.AddItem UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 0) = Feuil1.Cells(i, 1) UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 1) = Feuil1.Cells(i, 2) UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 2) = Feuil1.Cells(i, 3) UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 3) = Feuil1.Cells(i, 4) UserForm1.ListBox1.List(UserForm1.ListBox1.ListCount - 1, 4) = Feuil1.Cells(i, 5) Next i UserForm1.ListBox1.BoundColumn = 100 UserForm1.ListBox1.ColumnWidths = "100;100;100;100;100" UserForm1.Show End Sub...

seniorpapou · Accepted Answer

Vas voir sur ....., je t'ai répondu. Cordialement Merci de faire les réponses sur CE forum...