Discussion :

[Heathcliff_1]

Bonjour,

J'utilise Excel 2016 et je rencontre actuellement un problème dans mon code.

J'ai des valeurs (Val) dans la colonne B de la feuille MENU, et ces valeurs existent aussi dans la colonne F de la feuille DATA, où chaque Valeur est représentée par plusieurs lignes.
Ce qui m'intéresse dans cette feuille DATA c'est l'existence ou pas de la valeur "Validé" dans la colonne J de DATA.

En gros, si Val a plusieurs lignes et sur la colonne J on que "Validé" apparait au moins une seule fois alors, dans la colonne C de la feuille MENU je dois voir paraitre "Validé", si non (aucun validé trouvé), afficher "Non validé" dans la colonne C feuille MENU.
Voici mon bout de code qui ne fonctionne pas:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
For L = 3 To MENU.Cells(Rows.Count, 2).End(xlUp).Row
 
            Set C = DATA.Range("F:F").Find(MENU.Cells(L, 2), LookIn:=xlValues, lookat:=xlWhole)
            If Not C Is Nothing Then
            Set D = DATA.Range("J" & C.Row).Find("Validé", LookIn:=xlValues, lookat:=xlWhole)
            Df = D.Address
            If Not D Is Nothing Then
            MENU.Cells(L, 3) = "Validé"
            Else
            Do
            Set D = DATA.Range("J" & C.Row).FindNext(D)
            Loop Until D.Address = Df
            If D Is Nothing Then
            MENU.Cells(L, 3) = "Non validé"
 
 
            End If
 
            End If
            End If
 
   Next L

J'espère être précis dans ma demande.
Merci d'avance pour votre assistance.

Cdt;

[mfoxy]

Hello,

Perso, je n'utiliserais pas de code pour faire cela, un 'simple' CountIfs ferait l'affaire.

Bat,

[Heathcliff_1]

T'as raison ! c'est bizarre je n'ai pas pensé à ça :/
Merci beaucoup