Msgbox si valeur

[Marion]

Bonsoir le forum.


un tout petit soucis.

En colonne D je rentre des codes a partir de D4 il me faudrait un Msgbox lorsque le code TIti est tapé 'attention titi'



Merci de votre aide


A+Marion

 

[Hervé]

Bonjour

essaye un truc dans ce style :

Option Compare Text
Private Sub Worksheet_Change(ByVal Target As Range)
If Application.Intersect(Target, Range('d4:d65536')) Is Nothing Then Exit Sub
If Target = 'titi' Then MsgBox 'attention titi est saisie', , 'Fais gaffe...'
End Sub

A placer dans le code de la feuille adéquate : clique droit sur l'onglet, puis visualisé le code.

Salut

 

[JeanMarie]

Bonjour

Regarde le fichier joint, si tu sélectionnes une des cellule de la plage D465536, et que tu cliques sur le menu Données/validation...
Tu verras dans la boîte de dialogue les options à mettre pour afficher le message.

@+Jean-Marie [file name=Marion_20050611190206.zip size=1380]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Marion_20050611190206.zip[/file]

Message édité par: JeanMarie, à: 11/06/2005 19:02

 

[Marion]

bonsoir au forum et a vous deux.


les deux propositions sont toutes les deux bonnes.


Un grand merci

Bisous


A+Marion