Clique sur un texte démarre macro

Bonjour,

J'aimerais savoir s'il est possible de cliquer sur un texte présent par exemple en cellule B3 et que cela démarre une macro?

Merci,

Oiseau Bleu

Salut l'Oiseau bleu,

oui, sans souci, avec 36 possibilités de macros selon le style de la cellule (couleur, fonte, gras...)...

Développe?

A+

Bonjour

Tu peux réagir au clic dans une cellule : le code peut tester si la cellule contient quelque chose de précis ou directement exécuter un code

Il faut utiliser l'événement SelectionChange de la feuille avec dans le module de la feuille concernée un code de ce type

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    If Intersect(Target, Range("B3")) Is Nothing Then Exit Sub
    'code de la macro ou appel à la macro
End Sub

Bonsoir,

en cellule B3 vous créez un lien qui cible cette cellule B3, vous entrez le texte que vous voulez.

Sur le code de la feuille où se trouve cette cellule vous entrez ce code :

Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    If Target.Range.Address = "$B$3" Then
        Call LouReeD
    End If
End Sub

où LouReeD est le nom de la macro à lancer, vous pouvez très bien le changer mais cela ne serait pas opportun !

Et voilà, un clic sur le lien, le code se lance.

Ici le code est fait pour B3 comme vous le demandiez, mais je suppose que vous avez compris comment faire pour changer cette référence, non ?

Un fichier :

6lien-macro.xlsm (17.24 Ko)

@ bientôt

LouReeD

Bonjour,

Merci beaucoup pour les réponses.

Oiseau Bleu

Merci pour vos remerciements !

@ bientôt

LouReeD

Rechercher des sujets similaires à "clique texte demarre macro"