Microsoft 365 lien hypertexte variable vers les onglets du classeur

[CHAPELLE35]

Bonjour,
ma demande concerne la possibilité de créer un lien hypertexte variable (sans VBA de préférence) à partir d'une cellule qui change de valeur après un choix d'une liste déroulante.
Selon le nom de la cellule, le lien hypertexte renvoi vers l'onglet correspondant.
Ci-joint un modèle
Un grand merci pour votre aide

 

[chris]

Bonjour

 

[CHAPELLE35]

Bonjour chris,
merci pour la réponse mais le lien hypertexte de ton fichier ne fonctionne pas j'ai une fenêtre qui s'ouvre "Microsoft a identifié un problème potentiel de sécurité" puis "impossible d'ouvrir le fichier spécifié"
Pb sur mon ordi ?
Merci

 

[JHA]

Bonjour à tous,

J'ai modifié la formule de chris en mettant
=LIEN_HYPERTEXTE("[LIEN HYPERTEXTE2.xlsx]"&RECHERCHEV(E2;$A$1:$B$3;2;0)&"!A1";RECHERCHEV(E2;$A$1:$B$3;2;0))

JHA

 

[CHAPELLE35]

Bonjour JHA,
merci çà fonctionne parfaitement, j'aimerai également insérer un nom convivial comme "détail ville" mais je ne vois pas ou l'insérer dans la formule, à chaque fois j'ai "nombre trop important d'arguments.
merci

 

[JHA]

Bonjour à tous,

=LIEN_HYPERTEXTE("[LIEN HYPERTEXTE2.xlsx]"&RECHERCHEV(E2;$A$1:$B$3;2;0)&"!A1";"Détail ville")

JHA

 

[CHAPELLE35]

Merci encore, une dernière précision si je renomme le fichier, du coup il faut modifier le nom dans la formule à chaque changement de nom ?

 

[Totom_mrs]

Bonjour à tous,

=LIEN_HYPERTEXTE("[LIEN HYPERTEXTE2.xlsx]"&RECHERCHEV(E2;$A$1:$B$3;2;0)&"!A1";"Détail ville")

JHA

Bonjour, j'ai trouvé cette formule très utile. J'aurais souhaité l'adapter à mon cas.
Je cherche à insérer mes Hyperliens DANS une colonne de numéros afin qu'ils pointent vers des onglets portant le même numéro.

Dans le projet de JHA, il faut choisir dans une liste déroulante pour rejoindre l'onglet.
Je souhaiterai que l'hyperlien se mette sur la valeur "ROME" par exemple pour pointer sur l'onglet "ROME".

Je vous joins une petite capture d'écran de ce que je fais aujourd'hui à la main ... mais j'ai 300 fiches à pointer et de régulières modifications

Merci à tous

 

[JHA]

Bonjour à tous,

Peut-être...

JHA

 

[Totom_mrs]

Bonjour à tous,

Peut-être...

JHA

Bonne année !!!

Merci pour cette réponse, mais ce n'est pas tout à fait ce que j'essaie de faire (sans y arriver).

Dans le fichiers LIEN HYPERTEXTE3, mon objectif se définirait comme suit:
1) je créer une liste de Noms de villes
2) je génères automatiquement les onglets éponymes des Noms de villes
3) j'insère un lien hypertexte sous chaque nom de ville qui pointe vers l'onglet relatif.


Je vous joins mon fichier de travail, ce sera peut être plus clair avec toutes mes références.
Onglets
VBA: mes bricolages en VBA (brouillons)
PROGRAMMATIC SYNTHESIS: Numéro de fiche (Sheets)
MODEL: le modèle d'onglet que je veux générer
000: Page de présentation avec index des liens hypertextes
001=> 314 : les onglets générés automatiquement.

Mon objectif est de pouvoir communiquer de façon présentable les sheets 000 à 314 et garder à mon niveau une synthèse plus facile à travailler.

J'ai réussi à générer les onglets à partir de ma numérotation.
J'ai réussi à générer un index pointant sur chaque onglet généré.
Mais je n'arrive NI à générer des liens hypertextes automatiquement dans ma colonne "SHEETS" ni à enchainer automatiquement toute la manip :

Depuis ma synthèse : générer les onglets depuis le modèle, les nommer comme sur ma liste, engendrer un index et boucler dans ma synthèse avec un lien hypertexte pointant sur l'onglet dédié.

 

[job75]

Bonsoir Totum_mrs, le fil,

S'il s'agit de créer des liens hypertextes en 1ère colonne de la feuille "PROGRAMMATIC SYNTHESIS" il suffit de placer cette macro dans le code de la feuille :

Private Sub Worksheet_Activate()
Dim c As Range
Application.ScreenUpdating = False
With [Tableau2[Sheet]]
    .Hyperlinks.Delete 'RAZ
    For Each c In .Cells
        Me.Hyperlinks.Add c, "", "'" & c & "'!A8"
    Next
    .HorizontalAlignment = xlCenter 'cadrage
End With
End Sub

Elle se déclenche quand on active la feuille.

A+

 

[Totom_mrs]

Bonsoir Totum_mrs, le fil,

S'il s'agit de créer des liens hypertextes en 1ère colonne de la feuille "PROGRAMMATIC SYNTHESIS" il suffit de placer cette macro dans le code de la feuille :

Private Sub Worksheet_Activate()
Dim c As Range
Application.ScreenUpdating = False
With [Tableau2[Sheet]]
    .Hyperlinks.Delete 'RAZ
    For Each c In .Cells
        Me.Hyperlinks.Add c, "", "'" & c & "'!A8"
    Next
    .HorizontalAlignment = xlCenter 'cadrage
End With
End Sub

Elle se déclenche quand on active la feuille.

A+

je n'y arrive pas

Excel me retourne "erreur de caractérisation du mot clé Me"
tant pis je vais finir à la main ... je n'arrive pas à utiliser correctement VBA. Ca prouve qu'il faut apprendre quelques bases avant de se lancer ^^

 

[job75]

je n'y arrive pas

J'ai bien précisé que la macro doit être placée dans le code de la feuille "PROGRAMMATIC SYNTHESIS"(clic droit sur l'onglet et Visualiser le code).

C'est ce que j'ai fait sur le fichier que j'ai joint au post #11.

 

[Totom_mrs]

J'ai bien précisé que la macro doit être placée dans le code de la feuille "PROGRAMMATIC SYNTHESIS"(clic droit sur l'onglet et Visualiser le code).

C'est ce que j'ai fait sur le fichier que j'ai joint au post #11.

Wahou vous êtes trop fort !
Merci j'étais tellement en train de déprimer avec toutes mes fonctions, mes liens, mes renvois qui ne se mettent pas à jour .... merci !!!