Excel liens hypertexte dans liste déroulante

Fermé
150pado Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 29 août 2008 - 20 août 2008 à 22:45
150pado Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 29 août 2008 - 22 août 2008 à 17:21
Bonjour,

bien le bonjour à ttes et tous

je voudrais créer une liste déroulante composée de liens hyper texte

excellente journée et grand merci
A voir également:

4 réponses

150pado Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 29 août 2008 4
22 août 2008 à 12:06
en faite ce que recherche c'est realiser ceci sur excel
je recherche à réaliser une liste déroulante de lien hypertexte sur une feuille excel afin de la copier sur les 54 feuilles de mon classeur pour me faciliter l'accés a chaque feuille et étre quitte de chercher les onglets en bas du classeur auriez vous une solution a me proposer
merci d'avance
1
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
22 août 2008 à 13:45
beh.. la solution elle est dans mon poste 1
1
150pado Messages postés 14 Date d'inscription mercredi 20 août 2008 Statut Membre Dernière intervention 29 août 2008 4
22 août 2008 à 17:21
bonjour lermite

je te remerci de ta réponse, mais ce que tu ecrit resemble a du language de programmation et malheureusement je ne suis q'un utilisateur d'excel par l'intermediaire de le souris ,peut tu me faire parvenir un exemple a copier coller?
merci d'avance
1
lermite222 Messages postés 8702 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 190
20 août 2008 à 23:16
Bonjour,
pour l'appeler directement de la list je ne vois pas, mais tu peu copier le lien dans une cellule du genre,
quand clic sur un lien de la liste, dans
List_Clic
    Range("C9") = List1.list(list1.ListIndex)
    Range("C9").Select
    Selection.Hyperlinks(1).Follow NewWindow:=False, AddHistory:=True
end sub

A+
0