OVH Cloud OVH Cloud

Bouton avec lien hypertexte...

2 réponses
Avatar
Patrick B
Bonjour, quel est la meilleur manière de créer un bouton dans une feuille
avec
un lien hypertexte qui mène à une autre feuille ?

J'aimerais me servir du bouton "bouton de commande" de la barre d'outil
"boîte à outils contrôle".

Je fini par y parvenir, mais le tout doit fonctionner même quand ont actives
les macros
à l'ouverture du fichier.

Quand j'active les macros, je perd les liens hypertexte.


Merci.

2 réponses

Avatar
michdenis
Bonjour Patrick,

Le plus simple,

Tu crées le lien hypertexte lorsque tu es en mode création pour ton bouton de commande.

et tu utilises cette macro
'.------------------
Private Sub CommandButton1_Click()
ThisWorkbook.ToggleFormsDesign
End Sub
'.------------------

Au premier clic, le clic sur ton bouton passe le classeur en mode création
et au deuxième clic, exécute le lien hypertexte

Tu peux aussi cacher le ligne hypertexte dans la cellule en dessous du bouton de commande
et utiliser quelque chose comme ceci pour l'exécuter

'-----------------
Private Sub CommandButton1_Click()
Range("A1").hyperlinks(1).follow
End Sub
'-----------------


Salutations!




"Patrick B" a écrit dans le message de news: 9ipof.14346$
Bonjour, quel est la meilleur manière de créer un bouton dans une feuille
avec
un lien hypertexte qui mène à une autre feuille ?

J'aimerais me servir du bouton "bouton de commande" de la barre d'outil
"boîte à outils contrôle".

Je fini par y parvenir, mais le tout doit fonctionner même quand ont actives
les macros
à l'ouverture du fichier.

Quand j'active les macros, je perd les liens hypertexte.


Merci.
Avatar
Patrick B
Merci pour tes conseils
"michdenis" a écrit dans le message de news:

Bonjour Patrick,

Le plus simple,

Tu crées le lien hypertexte lorsque tu es en mode création pour ton bouton
de commande.

et tu utilises cette macro
'.------------------
Private Sub CommandButton1_Click()
ThisWorkbook.ToggleFormsDesign
End Sub
'.------------------

Au premier clic, le clic sur ton bouton passe le classeur en mode création
et au deuxième clic, exécute le lien hypertexte

Tu peux aussi cacher le ligne hypertexte dans la cellule en dessous du
bouton de commande
et utiliser quelque chose comme ceci pour l'exécuter

'-----------------
Private Sub CommandButton1_Click()
Range("A1").hyperlinks(1).follow
End Sub
'-----------------


Salutations!




"Patrick B" a écrit dans le message de news:
9ipof.14346$
Bonjour, quel est la meilleur manière de créer un bouton dans une feuille
avec
un lien hypertexte qui mène à une autre feuille ?

J'aimerais me servir du bouton "bouton de commande" de la barre d'outil
"boîte à outils contrôle".

Je fini par y parvenir, mais le tout doit fonctionner même quand ont
actives
les macros
à l'ouverture du fichier.

Quand j'active les macros, je perd les liens hypertexte.


Merci.