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

Macros et VBA Excel Discussion :

Message si certaines cellules modifiées [XL-2007]


Sujet :

Macros et VBA Excel

  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Novembre 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Novembre 2008
    Messages : 106
    Par défaut Message si certaines cellules modifiées
    Bonjour le Forum

    Après plusieurs petits travaux en VBA Excel avec des userforms et autres trucs, je commence à explorer les événements Change.... et ça me pose quelques problèmes!

    Le code pour effectuer ce que je cherche à faire est probablement très simple, mais je n'y arrive pas!

    Donc voici la chronologie de ce que je veux faire :
    • L'utilisateur saisi une donnée dans la colonne B
    • Un message apparait avec le signe "Attention" (triangle jaune avec !)
    • L'utilisateur doit cliquer sur OK pour fermer la fenetre


    Mon problème est qu'il y aura des changements dans d'autres colonne de la même feuille, mais que le message ne doit pas s'afficher...

    Ma déduction est que ça doit aller dans le Worksheet_Change mais c'est pour limiter à la colonne B ...

    J'ai besoin de votre aide

  2. #2
    Expert confirmé
    Homme Profil pro
    Inscrit en
    Août 2010
    Messages
    3 453
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations forums :
    Inscription : Août 2010
    Messages : 3 453
    Par défaut
    Bonjour,

    Teste ce qui suit et adapte :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
     
    Private Sub Worksheet_Change(ByVal Target As Range)
     
        If Target.Column = 2 Then
     
            MsgBox "Attention, vous venez de saisir la valeur '" & Target & "' !", _
                    vbExclamation, _
                    "Contrôle de saisie."
     
        End If
     
    End Sub
    Hervé.

  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Novembre 2008
    Messages
    106
    Détails du profil
    Informations personnelles :
    Localisation : Canada

    Informations forums :
    Inscription : Novembre 2008
    Messages : 106
    Par défaut


    Ça fonctionne à merveille! Je savais que ce serait probablement très simple!!

    MERCI

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

Discussions similaires

  1. Réponses: 12
    Dernier message: 13/03/2015, 10h59
  2. Réponses: 12
    Dernier message: 07/06/2009, 21h19
  3. [JTABLE]Colorier certaine cellule
    Par cameleon2002 dans le forum Composants
    Réponses: 3
    Dernier message: 31/12/2005, 10h15
  4. [JTable] Changer le style de certaines cellulles
    Par bourinator dans le forum Composants
    Réponses: 4
    Dernier message: 08/10/2005, 14h40
  5. [JTable] Empêcher sélection de certaines cellules
    Par Oliveuh dans le forum Composants
    Réponses: 6
    Dernier message: 28/07/2004, 12h47

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