MsgBox conditionnelle

vbanow -  
f894009 Messages postés 17277 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

f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
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
vbanow
 
Merci beaucoup f894009,

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

:'(
0
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
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
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
f894009 Messages postés 17277 Date d'inscription   Statut Membre Dernière intervention   1 713
 
Re,

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