Discussion :

[pilounet54]

Bonjour
J’ai 6 colonnes contiguës, et part ligne je souhaiterai n’avoir qu'un seul texte "ok" ,comment stp je pourrai contrôler le nb de texte qui ne pêut pas etre superieur a un seul et par ligne Soit par formule ou en vba pas de probleme Merci

[Daniel.C]

Bonjour,

Par formule, pour contrôler qu'il y a un valeur OK et une seule :

Code :

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

=SI(NB.SI(A1:F1;"OK")=1;"OK";"NOK")

et pour contrôler qu'il n'y a pas plus de 3 cellules remplies :

Code :

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

=SI(NBVAL(A1:F1)<4;"OK";"NOK")

[pilounet54]

es que l'on peu allez jusqu'a exemple : efface plage si >2
j'essaye de mon cote mais pour l'instant pas de resultat
merci pour ce premier jet
salutation

[Daniel.C]

Ta question est ambiguë; s'il y a plus de deux "OK" :

Code :

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

1
2
3
4
    ligne = 1
    If Application.CountIf(Range(Cells(ligne, 1), Cells(ligne, 6)), "OK") > 2 Then
        Range(Cells(ligne, 1), Cells(ligne, 6)).ClearContents
    End If

s'il y a plus de deux cellules non vides :

Code :

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

1
2
3
4
    ligne = 1
    If Application.CountA(Range(Cells(ligne, 1), Cells(ligne, 6))) > 2 Then
        Range(Cells(ligne, 1), Cells(ligne, 6)).ClearContents
    End If

[pilounet54]

bonjour et deja merci beaucoup car je peu adapter à plein de chose ...
comment devient ton expert ! ihihihi ! je commence à le savoir