Lien hypertexte automatique [Résolu/Fermé]

Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
 -
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
 -
Bonjour,

Nouvelle question pour les pros d'Excel...

Existe-t-il une façon de générer les liens hypertextes automatiquement ou via une formule ?
Voilà ce que je veux faire :
J'ai une page BILAN qui regroupe un récapitulatif de toutes mes feuilles de mon tableau Excel.
J'ai en colonne A toutes les noms de pages de mon classeur. Est-il possible de créer des liens directs vers ces pages autrement qu'en créant le lien hypertexte via clic droit...

BILAN
2017-11 Réponse A
2017-12 Réponse B
2018-01 Réponse C
etc etc

J'espère avoir été assez clair...
Merci d'avance

Afficher la suite

4 réponses

Réponse 1 / 4
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
 697
Bonjour à tous

Si ça peut aider ; un exemple que j'ai chipé sur le forum il y a quelques années.

https://www.cjoint.com/c/GIboYYJ0rC8

Cordialement
Merci
1
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

CCM 56853 internautes nous ont dit merci ce mois-ci

Signaler
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
 697
Pour compléter ce post ; le lien de la discussion

https://forums.commentcamarche.net/forum/affich-30282099-liens-hypertexte-vers-onglets-du-meme-classeur
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
 >
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
Je regarde ça demain... Pas trop le temps de comprendre tout ça ce soir...
Mais merci !
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
 >
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
Nickel, après quelques ajustements, ça marche nickel !!!
J'ai rajouté une colonne à mon tableau de base pour avoir le lien à côté de mon nom de feuille...

Merci à toi pour ce partage !
Signaler
Messages postés
2714
Date d'inscription
dimanche 3 mai 2009
Statut
Membre
Dernière intervention
5 août 2020
 697 >
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
Bonjour

Remerciement relayé à Mike-31 auteur des fonctions

cordialement
Réponse 2 / 4
Messages postés
591
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
19 juin 2020
 48
bonjour,
en considérant que les noms de feuilles sont colonne A de la feuille bilan et que les réponses soient toute dans la même case sur chaque feuille (dans mon exemple C1) :
=INDIRECT(A1&"!"&"C1") vous renverra la valeur de la cellule C1 stockée dans la feuille dont le nom est indiqué en A1
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
Bonjour Fabien25000 et merci de ta réponse.

J'utilise cette formule pour avoir les réponses A, B, C, etc.
Mais ce n'est pas l'objet de ma demande...
Je voudrais savoir s'il existe une formule qui quand je clique sur "2017-11", m'emmène directement à la feuille concernée et ce sans avoir à créer le lien hypertexte pour toutes les feuilles...
Suis-je plus clair ? Merci
Réponse 3 / 4
Messages postés
591
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
19 juin 2020
 48
oui je comprend mieux, par formule je ne connais pas et je ne pense pas que ça soit possible; c'est faisable par VBA certainement mais à mon avis pas plus rapide que 4 clic pour créer le lien hypertext..
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
Oui ce n'est que 4 clics mais quand il y a beaucoup de pages dans un classeur... Je me demande si ce n'est pas plus simple avec une formule ou autre moyen...
Réponse 4 / 4
Messages postés
591
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
19 juin 2020
 48
Bonjour PapyLuc51
Ces formules sont géniales j'ai chipé le fichier à mon tour !
sinon une solution VBA ci dessous : 

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim adresse As String

If Not Application.Intersect(Target, Range("A2")) Is Nothing Then
    adresse = Worksheets("Confort").Range("A2").Text
    Worksheets(adresse).Activate
End If
'Répéter le if not jusqu'à end if pour chaque ligne
'ou essayer avec une boucle si ça tourne
'je n'aurai pas le temps de m'y pencher aujourd'hui malheureusement
'si la solution peux convenir je m'y mettrai 
End Sub
Signaler
Messages postés
591
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
19 juin 2020
 48
Finalement j'ai pas pu résister et la boucle fonctionne trés bien,
J'ai mis jusque ligne 10 "i = 2 to 10" mais on peux mettre 30 000 si on a 30K lignes c'est pareil. le code : 
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'lien hypertext par doubleclic sur cellule
Dim adresse As String
Dim i As Integer

For i = 2 To 10
    If Not Application.Intersect(Target, Range("A" & i)) Is Nothing Then
        adresse = Worksheets("Confort").Range("A" & i).Text
        Worksheets(adresse).Activate
        Exit For
    End If
Next i

End Sub

donc rien d'autre à rajouter
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
 >
Messages postés
591
Date d'inscription
mercredi 5 octobre 2016
Statut
Membre
Dernière intervention
19 juin 2020
Merci Fabien !
Je maîtrise pas trop ces méthodes, je vais essayer de m'y atteler demain...
Merci !
Signaler
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
 >
Messages postés
25
Date d'inscription
vendredi 31 mars 2017
Statut
Membre
Dernière intervention
15 mai 2019
Je ne sais pas du tout utiliser le VBA ! Je vais faire des tests mais ça me paraît compliqué pour moi...
Posez votre question