Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2013 Message avec condition

306255

XLDnaute Occasionnel
Bonjour à tous,

JE souhaiterais mettre un message "a remplir" si la case est vide à condition que le choix soit sur autre nationalité

Merci d'avance pour votre aide
 

Pièces jointes

  • message condition.xlsx
    8.3 KB · Affichages: 10

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonjour,
un essai en PJ avec une macro événementielle basée sur C8 :
VB:
Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo Fin: If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, [C8]) Is Nothing Then
         If [C8] = "Autre nationalité" And [D8] = "" Then [D8] = "A remplir"
         If [C8] = "Française" And [D8] <> "" Then [D8] = ""
    End If
Fin:
End Sub
En D8 j'ai mis une liste déroulante basée sur la liste de la feuille 2.
 

Pièces jointes

  • message condition.xlsm
    16.4 KB · Affichages: 7

job75

XLDnaute Barbatruc
Bonjour 306255, sylvanu,

Ceci doit suffire :
VB:
Sub Worksheet_Change(ByVal Target As Range)
If LCase([D7]) = "autre nationalité" And [D8] = "" Then [D8] = "A remplir"
End Sub
A+
 

Pièces jointes

  • message condition(1).xlsm
    18.3 KB · Affichages: 6

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…