SI PLUSIEURS CELLULES REMPLIES ALORS

Question

Bonjour,

je voudrais créer une formule qui puisse décrire cette regle:
si un ecart 3 jours de suite (3 cases cochées "1" dans ecart), alors une non conformité, mais si ce ne sont pas des jours a la suite, pas de non conformité.

exemple 

        LUNDI                            MARDI                             MERCREDI                 JEUDI             VENDREDI           

ECART GRAVITE            ECART  GRAVITE             ECART    GRAVITE      ECART  GRAVITE   ECART GRAVITE
     1         1                      1         1                          1          1                     1       1               1        1

EXPLICATION: 
3 écarts de "gravité" 1 forment une non  conformité suite à la récurrence de la situation (3 jours consécutif)
Les gravités sur trois jours consécutifs sont ajoutés, si =3,4,5 alors une non conformité
                                                                           6,7,8= 2 non conformité
                                                                            9,10,11= 3 non conformité...

La difficulté pour moi est quil s'agit de trois jours consécutifs, et non de la semaine, de plus, une gravité 3 (qui est une gravité max) entraine de suite une non conformité.....

Merci de votre aide!

Vaucluse · Answer

Bonjour
il manque un peu d'info dans votre demande:
commet sont organisées vos données:
nom des colonnes écarts
nom des colonnes gravité 
que se passe t il dans chaque ligne?
(a moins que vos données ne soient en colonne.)
où voulez vous afficher vos 3,4,5, 6,7,8 etc....
pouvez vous nous en dire plus, ou mieux, monter un petit modèle de ce que vous souhaitez et le déposer sur:
http:www.cijoint.fr/ 
et revenir mettre le lien dans un prochain message.
Dans l'attente
crdlmnt

Vaucluse · Answer

Suite
en attendant un  petit modèle pour faire joujou.
Crdlmnt
http://www.cijoint.fr/cjlink.php?file=cj201003/cijAAc2uOU.xls

Vaucluse · Answer

Bonjour
je regarde, sans rien promettre:
encore une question pour aller le plus vite possible au bon résultat:
que se passe t -il si en 3 jours de suite, à par exemple: 3,1,1
Y a t'il 2 non conformes ou une?
Sachant que si j'ai bien compris:
3,1,1,1 donne 2 non conformes (une fois trois,  et une fois deux)?
A+

Vaucluse · Answer

Re
Voir lien ci dessous
http://www.cijoint.fr/cjlink.php?file=cj201003/cijaTbtfx7.xls
dites moi après manip si cela correspond à ce que vous attendez car je n'assimile pas trop bien comment il faut faire les calculs,et tout particulièrement avec un jour 2 et le suivant 1 et celui d'après 0.(soit deux jours consécutifs à moins de 3 dont le total fait 3 ou +)?
Notes pour le fichier joint:
compte tenu de la configuration de votre tableau, il n'est pas facile , voire utopique, de traiter directement le tableau avec des formules, d'une part pour traiter la détection des "successions" et d'autre part pour traiter les champs si les valeurs intermédiaires d'autres colonnes viennent perturber les résultats.
j'ai donc reconstruit en bout de champ le tableau des gravités de AB à AF

Le résultat complet est pour l'instant dans la colonne AG

la question du report d'une semaine à l'autre n'est pas encore traitée. J'attend pour cela vos commentaires sur cette première approche

Pour info: le sujet est traité en deux temps:
1° détection des 3 et multiples et décompte(1° partie de formule en colonne AG)
2° détection des successifs éliminant les "déjà comptés" précédents de AH à AJ
les formules ne calculent que des multiples de 3, pas de décimale et à l'inférieur
un total de 8 donne 2 NC par exemple
 Il restera surement des cas de notation à traiter en fonction de vos essais, je suis à votre écoute 

Dans l'attente, je reste à l'écoute.
Crdlmnt

Vaucluse · Answer

Re re
ci joint une nouvelle tentative, incluant le passage d'une semaine à l'autre.
Ce n'est peut être encore pas tout résolu! je vous laisse traiter tous les cas de figure que vous rencontrez
Merci de lire le commentaire avant manip
Bonne soirée
a vous lire... pour tout ce qui ne va pas!
Crdlmnt

http://www.cijoint.fr/cjlink.php?file=cj201003/cijbuOc15L.xls

Vaucluse · Answer

Errata
petits problèmes décelés sur fichier précédent
Merci de voir avec celui ci
Modifs pour info:
champ de AK à AO: le >3 dans les formules devient >2
Formule modifiée dans AP pour éviter des affichage erronés
Crdlmnt.
http://www.cijoint.fr/cjlink.php?file=cj201003/cijkG36V4w.xls

Marcel · Answer

Bonsoir

Pour éviter les usines à gaz, j'aurais eu tendance à ajouter 2 colonnes de cumul par jour, quitte à les masquer.
pour chaque cumul le même principe :
si écart ce jour alors cumul écarts = cumul écarts jour précédent + écart du jour, sinon 0
si écart ce jour, cumul gravité = cumul gravité jour précédent + gravité du jour, sinon 0
Il suffit ensuite en fin de semaine de traiter les maxis cumul écarts et cumul gravité pour définir les non conformités.
C'est de plus facilement chaînable d'une semaine sur l'autre en récupérant les cumuls du vendredi pour le lundi.
C'est ce que j'aurais fait mais ce n'est peut-être pas la meilleure solution.

Vaucluse · Answer

Bonjour Marcel
le meilleur moyen, de le savoir, c'est de mettre en place pour voir ce que cela donne. Pour le moment, ce ne sont que des supputations, ne pensez vous pas?
On reste dans l'attente d'une proposition répondant à l'ensemble des demandes.
Crdlmnt

eriiic · Answer

Bonjour tout le monde,

J'ai lu un peu lu le fil et je trouve que ça manque de précision....
Si tu as 6 jours consécutifs avec gravité 1 est-ce que tu as :
- 1 NC jours 1 et 4 (au début de 2 périodes, et on repart à 0 pour le décompte)
- 1 NC jours 3 et 6 (en fin de 2 périodes, et on repart à 0 pour le décompte)
- 1 NC jours 3,4,5,6 parce qu'on ne regarde qu'en arrière
- 1 NC jours 1,2,3,4 parce qu'on ne regarde qu'en avant ?
- 1 NC jour chaque jour parce que l'on peut regarder 3 jours consécutifs en avant et en arrière ?

Précises ou fais un tableau sur 1 ligne (en omettant les WE) présentant les différents cas pour que tout soit bien clair.

C'est faisable par formule mais au prix d'une certaine lourdeur. Il faudrait envisager une fonction personnalisée. A voir si ça t'interesse et si tu peux.

eric

Vaucluse · Answer

Bonjour Eric

"C'est faisable par formule mais au prix d'une certaine lourdeur. Il faudrait envisager une fonction personnalisée. " 

effectivement! voir ma proposition peut être définitive) message 9! c'est assez lourd!

de ce que j'ai compris en attendant le retour de So:
les NC se compte par trois successifs si inférieures à gravité 3
par multiple de 3 au dessus de gravité 2
donc 1NC de 3à5 2NC à 6 etc.....
chaque NC évaluée quelle qu'elle soit remet compteur à 0.
les valeurs non comptées des jeudis et vendredis (donc<3) se reportent sur la semaine suivante.
Je veille tes réponses pour apprécier une solution forcément plus simple que la mienne.
Crdlmnt. Bonne journée
PS au moins peut on dire que So a lancé un sujet intéressant!pour le moment je cherche plus simple.

Vaucluse · Answer

Exact
une lacune de ma part. 
Je n'avais pas saisi non  plus (il faut dire que ce n'est pas très simple) que la NC était à détecter lorsque le total est 3
Dans ma proposition seule les >2 sont détectée comme une ou plusieurs NC, mais le 2 compte en fait comme 1
Je regarde tout ça
A+
Crdlmnt

Vaucluse · Answer

re
nouvelle tentative. 
J'ai un peu de mal à reconstituer tous les cas de figures possibles!
donc je vous laisse tester.Ca devrait aller mieux
Crdlmnt
http://www.cijoint.fr/cjlink.php?file=cj201003/cijTEFkxez.xls

so · Answer

Désolé mais je ne peux pas ouvrir le fichier, voici le message d'erreur,
!!! Fichier non accessible !!!
   « Conformément à la loi Fichiers, Informatique et Liberté du 06/01/78, vous disposez
d'un droit d'accès, de communication et de rectification des données qui vous sont demandées,
et qui nous sont nécessaires au traitement de votre demande. Ces informations resteront confidentielles,
elles ne seront communiquées à aucun tiers. Aucun croisement de données par recoupement de fichier ne sera effectué. » 

 vous pouvez exercer votre droit d'accès et de rectification en adressant votre demande à:   webmaster@cijoint.fr 


© 2006-2010 Cijoint.fr - Tous droits réservés. 
    
ne l'avez vous pas protéger? ou peut être ai-je fais une fausse manip, c'est la premiere fois que je lance un SOS sur le forum, alors peut être que quelque chose m'échappe

Vaucluse · Answer

Désolé, mais c'est bien moi qui est "foiré"
voila un nouveau lien qui devrait aller mieux:
http://www.cijoint.fr/cjlink.php?file=cj201003/cij3INyQqu.xls
avec mes excuses
Crdlmnt

Marcel · Answer

Désolé de n'avoir pas pu m'y remettre + tôt.
Ci-joint une approche de ce que je proposais en #10

http://www.cijoint.fr/cjlink.php?file=cj201003/cijD7SnYUv.xls

J'ai laissé tomber le cumul des écarts qui ne sert à rien.

Je me pose encore une question.
Si lundi=1 gravité, mardi=1, et mercredi=2 soit 4 en 3 jours
On obtient une non conformité le mercredi car >3 mais que fait-on de la quatrième ?
On la conserve en mémoire pour l'ajouter au jeudi si il y en a ?

so · Answer

désolé j'ai oublié un petit point, la si je note une gravité le jeudi et une le vendredi (ou que le vendredi), cela devrait me notifier un point de vigilence pour que si le lundi de la semaine suivante (ou lundi et mardi, cela dépend du remplissage du jeudi et du vendredi de la semaine precedente) il y ai une NC, et la se n'est pas le cas,

mais tout mes encouragement quand même! et merci encore pour votre travail.

Marcel · Answer

Version corrigée pour RAZ cumul quand >=3

http://www.cijoint.fr/cjlink.php?file=cj201003/cijd8m93m4.xls

Je ne comprends pas ta dernière remarque, cela fonctionne à partir de la 2ème semaine bien sur.

SO · Answer

re,

merci pour cette nouvelle tentative, mais le pb persiste, si je met une gravité de 1 le lundi , 0 le mardi et de 2 le mercredi, cela ne devriat pas m'afficher de NC, et pourtant c'est le cas, 

à votre écoute pour toute modif,

merci encore!

Marcel · Answer

"si je met une gravité de 1 le lundi , 0 le mardi et de 2 le mercredi, cela ne devriat pas m'afficher de NC, et pourtant c'est le cas"

Je viens de le faire plusieurs fois, je n'obtiens pas de NC, on doit ne pas se comprendre sur 1 point.

so · Answer

Toutes mes excuses, il semblerai que je me sois mélangé les pinceaux entre les personnes pour la dernière réponse, 

-Marcel aucun soucis et merci pour tout, le fichier avec cumul de gravité avec les colonnes rajoutées à coté de chaque gravité fonctionne très bien, merci pour tout!

-Vaucluse, le fichier est aussi très interessant, et le problème du lundi 1 , mardi 0 et mercredi 2 = affichage d'une NC au mercredi est sur votre fichier. ( ou le recap des jours est fait en fin de feuille sur la gauche), le concept est aussi très interessant puisque cela me permettrai de garder simplement le tableau tel quel à l'impression sans ajout de colonne...

merci pour tout à vous deux,

so · Answer

Toutes mes excuses, il semblerai que je me sois mélangé les pinceaux entre les personnes pour la dernière réponse, 

-Marcel aucun soucis et merci pour tout, le fichier avec cumul de gravité avec les colonnes rajoutées à coté de chaque gravité fonctionne très bien, merci pour tout!

-Vaucluse, le fichier est aussi très interessant, et le problème du lundi 1 , mardi 0 et mercredi 2 = affichage d'une NC au mercredi est sur votre fichier. ( ou le recap des jours est fait en fin de feuille sur la gauche), le concept est aussi très interessant puisque cela me permettrai de garder simplement le tableau tel quel à l'impression sans ajout de colonne...

merci pour tout à vous deux,

so · Answer

Toutes mes excuses, il semblerai que je me sois mélangé les pinceaux entre les personnes pour la dernière réponse, 

-Marcel aucun soucis et merci pour tout, le fichier avec cumul de gravité avec les colonnes rajoutées à coté de chaque gravité fonctionne très bien, merci pour tout!

-Vaucluse, le fichier est aussi très interessant, et le problème du lundi 1 , mardi 0 et mercredi 2 = affichage d'une NC au mercredi est sur votre fichier. ( ou le recap des jours est fait en fin de feuille sur la gauche), le concept est aussi très interessant puisque cela me permettrai de garder simplement le tableau tel quel à l'impression sans ajout de colonne...

merci pour tout à vous deux,

eriiic · Answer

J'insiste, mais quand tu auras répondu à ces questions du post 12 tout le monde y verra plus clair je pense...
Tu y as répondu par Vaucluse à très bien récapitulé les infos données et dans le même post : Merci pour le travail de Vaucluse, très bonne idée, cependant, (désolé!), le fonctionnement n'est pas exact... 
Et les 2 tentatives de marcel ce sont aussi résumée par 'c'est bon mais....'

Il n'y a aucune rigueur ni exhaustivité dans l'exposé de ta demande.
Et lorsque les formules se complexifient il est de plus en plus dur de modifier ou d'adapter à une nouvelle précision, un nouveau cas.

Si tu as 6 jours consécutifs avec gravité 1 est-ce que tu as : 
- 1 NC jours 1 et 4 (au début de 2 périodes, et on repart à 0 pour le décompte) 
- 1 NC jours 3 et 6 (en fin de 2 périodes, et on repart à 0 pour le décompte) 
- 1 NC jours 3,4,5,6 parce qu'on ne regarde qu'en arrière 
- 1 NC jours 1,2,3,4 parce qu'on ne regarde qu'en avant ? 
- 1 NC jour chaque jour parce que l'on peut regarder 3 jours consécutifs en avant et en arrière ? 

Précises ou fais un tableau sur 1 ligne (en omettant les WE) présentant les différents cas pour que tout soit bien clair. 

eric

eriiic · Answer

Vu que chaque feuille dépend de la précédente, et celle-ci de celle qui la précède etc une fonction personnalisée n'est peut-être pas adaptée.
Vu aussi que le changement de feuille par formule risque d'être chaud voici une proposition par macro avec un fichier exemple.

Pour simplifier les évolutions de ta feuille les lignes et colonnes concernées sont définies au début dans des Array().
J'ai supposé que 2 gravités consécutives de valeur 2 et 1 donnaient une NC.
Pour le contrôle les gravités ayant généré une NC sont sur fond orange.

Sub NC()
    Dim ws As Worksheet, listCol As Variant, listLig As Variant
    Dim cptNC() As Long, NC() As Long, lig As Long, col As Long
    ' liste des colonnes gravité, la dernière étant le nombre de NC de la semaine
    listCol = Array("D", "H", "L", "P", "T", "X")
    ' liste des lignes avec gravité
    listLig = Array(6, 7, 9, 10, 11, 12, 13, 14)
    '
    ReDim cptNC(UBound(listLig))
    For Each ws In Worksheets
        If Left(ws.Name, 3) = "Sem" Then
            ReDim NC(UBound(listLig))
            For lig = 0 To UBound(listLig)
                For col = 0 To UBound(listCol) - 1
                    If ws.Range(listCol(col) & listLig(lig)) > 0 Then
                        ' 1 gravité détectée
                        cptNC(lig) = cptNC(lig) + ws.Range(listCol(col) & listLig(lig))
                        If cptNC(lig) >= 3 Then
                            ' somme gravités >=3  => +1 Non Conformité
                            cptNC(lig) = 0
                            NC(lig) = NC(lig) + 1
                            ws.Range(listCol(col) & listLig(lig)).Interior.ColorIndex = 45
                        Else
                            ws.Range(listCol(col) & listLig(lig)).Interior.ColorIndex = xlNone
                        End If
                    Else
                        ' pas de gravité : remise à 0 du compteur
                        cptNC(lig) = 0
                    End If
                Next col
                ws.Range(listCol(UBound(listCol)) & listLig(lig)) = NC(lig)
            Next lig
        End If
    Next ws
End Sub

exemple sur 2 semaines : so.xls
shift+ctrl+T pour lancer la macro NC (à faire après chaque mise à jour des données)

Tester tous les cas de figure plus complètement.

eric

eriiic · Answer

PS: j'ai oublié de précisé que le nom des feuilles de données devait obligatoirement commencer par 'Sem' (respecter la majuscule), elles qu'elles devaient être triée dans l'ordre croissant puisque je les balaye dans l'ordre de leur position.

so · Answer

Bonjour,

Merci pour la macro elle fonctionne dans tous les cas de figures, cette solution me permet de ne pas modifier la visualisation du fichier pour les différents intervenants qui interviennent dessus et c'est un très bon point!
J'aurai une question au niveau des onglets, tous mes onglets sont notés ainsi: 
08.03.10 au 12.03.10
15.03.10 au 19.03.10  
et ainsi de suite  sur toute l'année, est ce qu'en le mettant sous la forme:
Sem 08.03.10 au 12.03.10
Sem 15.03.10 au 19.03.10 ...

est ce que les macro vont fonctionnées ainsi ou faut-il que je renomme mes pages?

Merci encore!

eriiic · Answer

Bonjour,

tu peux remplacer :
    For Each ws In Worksheets
        If Left(ws.Name, 3) = "Sem" Thenpar :
    For Each ws In ThisWorkbook.Worksheets
        If IsDate(ws.Name) Then

Seules les feuilles dont le nom correspond à une date conforme seront traitées, les autres non.
Et avec la modif ... In ThisWorkbook.Worksheets seul le classeur ayant la macro pourra être traité. Sinon tout classeur au premier plan était traité (risque de pertes de données...)

eric

eriiic · Answer

Après relecture je n'avais pas vu que tu avais 2 dates dans les noms d'onglets.
donc :
    For Each ws In ThisWorkbook.Worksheets
        If IsDate(left(ws.Name,8)) Then
eric

SI PLUSIEURS CELLULES REMPLIES ALORS

28 réponses

Votre réponse

Discussions similaires

Newsletters