Créer une boîte de dialogue sous condition Fermé

Question

Bonjour, 

Je débute en VBA (je m'y connais très peu) et j'ai une question.

Comment faire pour créer une boîte de dialogue sous condition?

Par exemple en A1 j'ai "W" et en A2 j'ai "SW"

J'aimerai qu'une boite de dialogue avec écrit "erreur" (par exemple) s'ouvre si ces deux conditions sont remplies.

Bien à vous.


Configuration: Windows XP / Internet Explorer 7.0

pijaku · Answer

Bonjour,

Clic droit sur l'onglet de la feuille concernée,

Copiez collez ce code dans la fenêtre Visual Basic Editor

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("A1") = "W" And Range("A2") = "SW" Then MsgBox "Erreur"
End Sub


Fermez cette fenêtre et testez

Luvmile · Answer

Ok merci ça fonctionne...

Maintenant j'ai un peu plus compliqué, je te joins une version de mon doc

J'aimerai qu'il me détecte automatiquement si par exemple colonne T : Antoine va en déplacement à Drogenbos.

Il doit repérer que c'est Antoine qui va là et qui est donc en "W" 

Donc qu'il doit afficher un message d'erreur car Jules est en SW et Antoine en W.

Je sais pas si c'est clair...

http://cjoint.com/?BHrrEWc60yH

luvmile · Answer

Alors je vais expliquer d'une autre manière.
Ligne 1 : 1    2    3      4     5    6     (ce sont des dates)
Ligne 2 : W   W   W    SW   W   DO
Ligne 4 : W   W   W    SW   W   DO

J'aimerai qu'il m'indique un message d'erreur car il y a deux SW en même date...

Sachant que les valeurs des lignes 2 et 4 peuvent changer.

Bien à toi.

Créer une boîte de dialogue sous condition

3 réponses

Discussions similaires