MsgBox conditionnelle

vbanow -  
f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour tout le monde,

J'ai un petit soucis avec VBA depuis hier,
Je voudrais afficher une MsgBox si on écrit dans une des cellule de la colonne F le texte "Terminée".

Je vous supplie de m'aider, je suis désespérée!!!!

1 réponse

  1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    code a mettre dans VBA de la feuille:

    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Application.Intersect(Target, Range("F:F")) Is Nothing And Target = "Terminée" Then
    MsgBox "Bonjour"
    End If
    End Sub
    0
    1. vbanow
       
      Merci beaucoup f894009,

      mais j'ai une message d'erreur qui apparaît "l'indice n'appartient pas à la sélection"

      :'(
      0
    2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,
      Curieux !!!!!!!!!!

      mettez votre fichier a dispo en remplacent les donnees sensibles sur https://www.cjoint.com/

      ne pas oublier de copier/coller le lien cree dans votre prochain message

      A+
      0
    3. vbanow
       
      Voici le lien, il 'agit de la feuille 2 ;)
      Encore merci beaucoup pour le temps que tu m'accordes !

      http://cjoint.com/?3HiolYYxCEv
      0
    4. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
       
      Re,

      Y a pas d'erreur !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
      0