IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Excel Discussion :

Lancer une macro lorsque l'on clique sur une cellule [XL-2007]


Sujet :

Excel

  1. #1
    Membre du Club
    Femme Profil pro
    Assistante logistique
    Inscrit en
    Août 2011
    Messages
    76
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Manche (Basse Normandie)

    Informations professionnelles :
    Activité : Assistante logistique
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2011
    Messages : 76
    Points : 56
    Points
    56
    Par défaut Lancer une macro lorsque l'on clique sur une cellule
    Bonjour,

    Je souhaite lancer une macro lorsque l'on se positionne sur une cellule.

    J'ai la solution pour un double clic en me positionnant dans ma feuille de Microsoft Excel Objects :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
    If Target.Cells = i39 Then
    MsgBox "bonjour", vbOKOnly
     
    End If
    Cancel = True
     
    End Sub
    mais existe t-il une possibilité lorsque la cellule est sélectionnée

    Merci pour votre aide

  2. #2
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    12 922
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 12 922
    Points : 28 908
    Points
    28 908
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Je doute que le code que tu affiches fonctionne correctement mais pour répondre à ta question
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
     If Target.Address = "$I$39" Then MsgBox "bonjour", vbOKOnly
    End Sub

  3. #3
    Membre du Club
    Femme Profil pro
    Assistante logistique
    Inscrit en
    Août 2011
    Messages
    76
    Détails du profil
    Informations personnelles :
    Sexe : Femme
    Localisation : France, Manche (Basse Normandie)

    Informations professionnelles :
    Activité : Assistante logistique
    Secteur : Industrie

    Informations forums :
    Inscription : Août 2011
    Messages : 76
    Points : 56
    Points
    56
    Par défaut
    Bonjour,

    Mon code fonctionnait mais ne me donnait pas le résultat voulu.

    Votre code est parfait.
    Merci et bonne journée

  4. #4
    Rédacteur
    Avatar de Philippe Tulliez
    Homme Profil pro
    Formateur, développeur et consultant Excel, Access, Word et VBA
    Inscrit en
    Janvier 2010
    Messages
    12 922
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Belgique

    Informations professionnelles :
    Activité : Formateur, développeur et consultant Excel, Access, Word et VBA

    Informations forums :
    Inscription : Janvier 2010
    Messages : 12 922
    Points : 28 908
    Points
    28 908
    Billets dans le blog
    53
    Par défaut
    Bonjour,
    Citation Envoyé par catetesse Voir le message
    Bonjour,
    Mon code fonctionnait mais ne me donnait pas le résultat voulu.
    Votre code est parfait.
    Merci et bonne journée
    Ceci ne peux fonctionner
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If Target.Cells = i39 Then
    C'est plutôt ceci
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    If Target.Address = "$I$39" Then

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 1
    Dernier message: 29/11/2012, 17h28
  2. Utiliser une méthode lorsque l'on clique sur un header d'une listeview
    Par kronoss dans le forum Windows Presentation Foundation
    Réponses: 5
    Dernier message: 19/04/2010, 22h16
  3. Réponses: 3
    Dernier message: 22/06/2009, 12h21
  4. Réponses: 4
    Dernier message: 18/10/2008, 05h54

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo