Créer Message d'Erreur

[Greg]

Bonjour,

Je bloque sur un problème sûrement tout simple, mais vba et moi c'est pas encore ça.

En fait, je souhaiterais qu'un message d'erreur apparaisse lorsque qu'une condition n'est pas remplie

exemple :

Si b3="PEC" et b5 different de "Annuelle" alors message d'erreur : "Attention ....".

Merci bcp pour votre aide.

Greg

 

[Jean-Marie]

Bonsoir Greg

If (Range("B3")="PEC") and (Range("B5")<>"Annuelle") then
Msgbox "Attention ....."
else
....
end if

@+Jean-Marie

 

[Greg]

Bonjour Jean-Marie,

Merci bcp ça marche nickel.

Encore une dernière question :
quelle est la ligne à rajouter pour que lorsque le message d'erreur s'affiche la celle b5 soit sélectionner automatiquement.

Merci encore.

Greg

 

[Eric C]

Bonjour le forum
Bonjour Greg & Jean-Marie

Avant le Else place cette ligne Range ("B5").Select
Ainsi si les conditions ne sont pas remplies, le MsgBox apparaîtra et lorsque tu auras cliqué sur Ok la cellule B5 sera à nouveau sélectionnée.
Bonne fin de dimanche

@ + Eric C