XL 2013 masquer zone de texte si...

yoda60

XLDnaute Nouveau
bonjour,
je souhaiterais démasquer une zone de texte (ici zone texte 1) si en D1 ile mot "ok " est inscrit ET que l'une des valeurs de la colonne L est inscrites en D3.

évidemment masquer si les conditions ne sont pas respectées.

Pour précision on doit pouvoir remplir D1 ou D3 dans n'importe quel ordre.

merci de votre aide

cordialement
 

Pièces jointes

  • test1.xlsm
    16.9 KB · Affichages: 4
Solution
Bonsoir Yoda,
Un essai en PJ avec :
VB:
Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("D1:D3")) Is Nothing Then
        If Application.CountIf([L:L], [D3]) > 0 And LCase([D1]) = "ok" Then
            Shapes("ZoneTexte 1").Visible = msoFalse
        Else
            Shapes("ZoneTexte 1").Visible = msoTrue
        End If
    End If
End Sub

sylvanu

XLDnaute Barbatruc
Supporter XLD
Bonsoir Yoda,
Un essai en PJ avec :
VB:
Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Not Intersect(Target, Range("D1:D3")) Is Nothing Then
        If Application.CountIf([L:L], [D3]) > 0 And LCase([D1]) = "ok" Then
            Shapes("ZoneTexte 1").Visible = msoFalse
        Else
            Shapes("ZoneTexte 1").Visible = msoTrue
        End If
    End If
End Sub
 

Pièces jointes

  • test1.xlsm
    16.3 KB · Affichages: 3

Discussions similaires