Problème dans une formule sur un planning Résolu

Question

Bonjour, 

J'aurai besoin dun peux d'aide sur un planning que j'avais mis au point
Suite à de nombreuses modifications, je viens de le passer à l'heure mais je bloque
Pouvez-vous me proposer une solution
Merci par avances

Le fichier en PJ

https://cjoint.com/c/KIqsaP0GwX4

Configuration: Windows / Edge 93.0.961.47

Le Pingou · Answer

Bonjour,
Je n’ai pas bien compris le problème, toutefois dans la ligne 5 où vous avez le numéro du jour, j’ai remarqué ceci : le 1 pour lundi et pour le prochain lundi vous avez le 2 !

Le Pingou · Answer

Re bonsoir,
Question: pourquoi systématiquement le jeudi n’a que 4 heures au lieu de 8 et le vendredi 1 heure au lieu de 4 heures … ?

Le Pingou · Answer

Bonjour,
J'ai trouvé une première correction pour la cassure du jeudi, dans la partie (SI(ET...)) la formule j'ai supprimé le [+1] pour la plage horaire:


Note : reste encore le problème pour le vendredi... pas encore trouvé!

PHILOU10120 · Answer

Bonjour Le Pingou

J'ai décomposé la formule

=SI(ET(M$6+M$1-ENT(M$6)>=RECHERCHEV(JOURSEM(M$6;2);Horaire_hebdo;2;0);M$6+M$1-ENT(M$6)<=RECHERCHEV(JOURSEM(M$6;2);Horaire_hebdo;3;0));M$6+1+M$1;ENT(M6)+1+1/24*8) 
 
Cela ne fonctionne pas comme il faut problème le vendredi 12:00 au lieu de 11:00
Le lundi début 9:00 au lieu de 8:00

Merci pour ton aide

Le Pingou · Answer

Bonjour, 
Il y a aussi des valeurs [=1/24] qui manque dans ligne 1 !
Il me reste le problème du vendredi qui reste sur une cellule  au lieu de 4 (pour 4 heures de travaux)..
Et aussi si un jour férié tombe entre les jours ouvrables (ma,mer et je)

Le Pingou · Answer

Bonjour,
Situation pour l'instant: https://www.cjoint.com/c/KIrkAb4XrEn

PHILOU10120 · Answer

Bon il me reste plus que le vendredi qui ne fonctionne pas, voici ma formule 

=SI(NB.SI(fériés;ENT(Q$6)+1)>0;ENT(Q$6)+1+1/24*18;SI(JOURSEM(ENT(Q$6)+1;2)>=6;ENT(Q$6)+1+1/24*18;SI(ET(Q$6+Q$1-ENT(Q$6)>=RECHERCHEV(JOURSEM(ENT(Q6);2);Horaire_hebdo;2;0);Q$6+Q$1-ENT(Q$6)<=RECHERCHEV(JOURSEM(ENT(Q6);2);Horaire_hebdo;3;0));SI(Q$1=0;ENT(Q$6)+1/24*8;Q$6+Q$1);ENT(Q$6)+1+1/24*8)))

Le Pingou · Answer

Bonjour,
J'ai encore un moment cette après-midi, j'espère trouver la solution.

Le Pingou · Answer

Bonjour,
Avec le premier bloc ; problème  avec heures du vendredi et avec jours fériés sur jours ouvrables 
Dans le deuxième bloc; problème avec les jours fériés dans plage lundi-vendredi !
Je fais une longue pause.
Le fichier: https://www.cjoint.com/c/KIrp3EY6JKn

PHILOU10120 · Answer

Bonsoir Le Pingou

Mon fichier avec mes problémes
Je vais étudier tes solutions pour voir si j'arrive à une solution
C'est vraiment bizarre le comportement de cette formule elle n'est pas Constante

https://www.cjoint.com/c/KIrsy1zUbb4

Merci

Le Pingou · Answer

Merci PhILOU10120,
J'ai l'impression que je suis dans le bon sens...!
Le voici: https://www.cjoint.com/c/KIrt2OPfI6n
Bonne soirée

Le Pingou · Answer

Bonjour PHILOU10120,
Merci de prendre cette version (modifier quelques détails)
Le lien: https://www.cjoint.com/c/KIsjhQPSQmn

PHILOU10120 · Answer

Bonjour Le Pingou

Oui ça avance mais encore un souci

 '=SI(ET(fériés;ENT(N$6)>0;JOURSEM(N$6;2)>=6);SI(ET(NB.SI(fériés;ENT(N$6+1))=0;JOURSEM(N$6;2)=7);ENT(N$6)+1+1/24*8;ENT(N$6)+1+1/24*18);SI(ET(N$6+N$1-ENT(N$6)>=RECHERCHEV(JOURSEM(ENT(N$6);2);Horaire_hebdo;2;0);N$6+N$1-ENT(N$6)<=RECHERCHEV(JOURSEM(ENT(N6);2);Horaire_hebdo;3;0));SI($M$1=0;ENT(N$6)+1/24*8;N$6+N$1);SI(NB.SI(fériés;ENT(N$6)+1);ENT(N$6)+1+1/24*18;ENT(N$6)+1+1/24*8)))


Devrait être N1 pas M1

Merci je regarde les différentes versions

Le Pingou · Answer

Bonjour,
Mes formules qui fonctionnent selon ma plage (M10:GL13)
Note: la première date [M13] est la date du début mentionnée en [L13] et non pas la suivante comme votre modèle..!
formule premier jour en [M13]:
=SI(ET(fériés;ENT(L$13)>0;JOURSEM(L$13;2)>=6);ENT(L$13)+0+1/24*18;ENT(L$13)+0+1/24*8) 
formule dès colonne [N13...]  a tirer jusqu'à [GL13]:
=SI(ET(fériés;ENT(M$13)>0;JOURSEM(M$13;2)>=6);SI(ET(NB.SI(fériés;ENT(M$13+1))=0;JOURSEM(M$13;2)=7);ENT(M$13)+1+1/24*8;ENT(M$13)+1+1/24*18);SI(ET(M$13+M$10-ENT(M$13)>=RECHERCHEV(JOURSEM(ENT(M$13);2);Horaire_hebdo;2;0);M$13+P$1-ENT(M$13)<=RECHERCHEV(JOURSEM(ENT(M$13);2);Horaire_hebdo;3;0));SI(M$10=0;ENT(M$13)+1/24*8;M$13+M$10);SI(NB.SI(fériés;ENT(M$13)+1);ENT(M$13)+1+1/24*18;ENT(M$13)+1+1/24*8))) 
Pour moi tout marche sans faute.

PHILOU10120 · Answer

Bonsoir Le Pingou

Pouvez-vous n'envoyer votre fichier ?
Lorsque je colle les formules en M13 et N13 le résultat n'est pas bon
En plus on test 2 fois mais il manque NB.SI devant féries
 =SI(ET(fériés;ENT(M$13)>0;JOURSEM(M$13;2)>=6);SI(ET(NB.SI(fériés;ENT(M$13+1))=0;

Tout cela n'est pas encore claire
Merci de votre participation mais le problème est ardu.

Le Pingou · Answer

Bonsoir,
Vous faite bien attention à :Note: la première date [M13] est la date du début mentionnée en [L13] et non pas la suivante comme votre modèle..! 

le voici (le même que sous poste 15, juste modifier le nom): https://cjoint.com/c/KIstQYaBBmn

Le Pingou · Answer

Bonsoir,
Eh bien je viens de transférer mes formules dans votre plage de planification (M6:GL6) et ton fonctionne correctement .

PHILOU10120 · Answer

Bonjour Le Pingou

Voilà avec beaucoup d'aide de ta part. Le fichier est opérationnel, j'ai modifié ta formule pour plus de précision et le raisonnement me convient mieux
Merci Pour toutes ton aide à plusieurs on a plus d'idées

https://cjoint.com/c/KItjqanI2N4 

Pouvez-vous regarder pour automatiser en VBA l'insertion de monteurs supplémentaires (un bloc de 31 lignes séparation comprise

Merci

Le Pingou · Answer

Bonjour,
Merci, content de savoir que cette fois c'est bon.
Je vais volontiers me pencher sur cette insertion de bloc monteur, mais pas de suite... Dès lundi/mardi prochain.
Bon dimanche.

Le Pingou · Answer

Bonjour PHILOU10120,
Je suis enfin sur votre demande. J’ai assimilé vos ordres de trie et j’ai des questions :
1.- Les plages nommées pour les monteurs 9 et 10 sont croisées. Si vous cliquer sur 9 cela trie le 10 et inversement.
2.- Vous avez pour chaque monteur 2 plages nommées [zone_trie_monteur3] sur colonne [=Planning!$A$71:$A$100] et[trie_monteur3] sur colonne[=Planning!$A$71:$D$100].
En principe seul la zone de trie est nécessaire et pour on utilise pour la colonne de trie cette instruction : [Key:=Columns(1)]
3.- Pour la commande de trei vous avez utilisé un cotr^le de formulaire, il est possible que se soit préférable d’utiliser un contrôle ActiveX…à voir !
Bon dimanche

Le Pingou · Answer

Bonsoir,
Merci du retour, pour chaque monteur il suffit de nommée la zone de tri et ensuite dans la macro on fixe la colonne par [Key:=Columns(1)].
De mon côté j'ai trouvée la solution pour utiliser vos boutons de commande de type [contrôle de formulaire] , reste la mise en place et le contrôle pour les cellules qui ont des fonctions ainsi que l'ajout de la plage nommée pour le tri.
Il est fort probable que je vais adapter vos macros... si nécessaire.
Patience.

Le Pingou · Answer

Bonsoir,
Bonne nouvelle, c'est pour demain fin de journée.
Mes puces ont sommeilles.

Le Pingou · Answer

Bonjour PHILOU10120,
Je tombe sur un problème avec le tri des zones: la colonne [D] à en ligne 1 le choix via liste déroulante et la suite de ligne 2 à 30  fait référence à la première ligne (toujours même nom de monteur.
Problème, si on trie les colonne de [A:D] alors la cellule de la liste déroulante reçoit son adresse (=$D$9) se qui est faux
Si la colonne [D] n'a qu'un nom de monteur il ne faut pas l'inclure dans le tri ...OUI / NON
OU il peut y avoir plusieurs monteurs et dans ce cas chaque cellule doit avoir sa liste déroulante
 
La suite dépend de votre réponse

Le Pingou · Answer

Bonjour,
Merci je corrige dans se sens [A,B,C]

Le Pingou · Answer

Bonsoir,
L’ajout d’un bloc se fait par la commande [Ajouter bloc à la fin]. La macro nomme la nouvelle zone et l’ajoute au gestionnaire des noms.
Concernant les divers tris, individuel ou global, j’ai réalisé de nouvelles macros qui travail de manière dynamique (chaque bouton de commande déclenche la macro unique pour la zone d’un monteur [Sub Choix_Zone_Trie()] et la [Sub trie_ordre_tous_monteurs()] pour tous les monteurs.
Le tout dans le module [lepingou], j’ai mis des commentaires dans les autres modules.
Le fichier : https://www.cjoint.com/c/KIBs5uXkFmn

Le Pingou · Answer

Bonsoir, 
J'ai oublié de supprimer un point d'arrêt sur la macro [ Sub Insertion_Bloc_Monteur()]
 Merci pour la correction...!

Le Pingou · Answer

Bonjour,
Je vais voir si c'est possible, il faut aussi revoir toutes les MFC de la partie représentation graphique qui n'est pas homogène du tout, donc va poser problème de codage.
Note pour les codes couleurs je me base sur les valeurs de la colonne [N] de la feuille de {Base]

Le Pingou · Answer

Bonsoir,
De mon côté se n’est encore pas gagné pour gérer la MFC via VBA… pas facile… !
Réponse à vos informations :
Oui prendre les couleurs de la colonne N 
--- oui pour ajout de bloc via macro

Remettre les cellules colonne N en phase avec colonne L 
--- c’est déjà fait dans la plage [couleur_monteurs] qui est dynamique [=DECALER(Base!$L$5:$N$5;;;NBVAL(Base!$L:$L)-1) !

Prévoir 15 monteurs avec 15 couleurs
--- non, reste à 12 et le client ajoute le nouveau nom en fin liste en [L] et choisi la couleur de fond et ensuite c’est la macro qui met à jour les différents codes.

Zone couleur_monteurs L5 à M19
---Non se fait de manière dynamique voir réponse précédente.

Note concernant la MFC il est nécessaire qu’elle soit valable pour tous les monteurs dans tous les blocs.

Le Pingou · Answer

Bonsoir,
Je vous laisse essayer cette version. A la base il y a 12 monteurs. Lors de l’ajout d’un bloc vous cliquez sur la commande [Ajouter bl……..fin] et vous devrez d’abord introduire un nouveau nom ainsi que la couleur de fond. La macro ajoutera le bloc et créera la nouvelle zone nommée et mettra à jour toute les règles de la MFC.
Le dossier : https://www.cjoint.com/c/KIDtHtRzl3n

Le Pingou · Answer

Bonjour,
J'attends votre réponse sur vos essais.
Note, je ne suis plus le poste de   Grouch.

PHILOU10120 · Answer

Bonjour  Le Pingou

Je viens de tester le fichier, quand on crée un nouveau monteur, le graphique n'est pas en couleur. Il y a une manipulation à faire en plus ?
Pour les tris ils fonctionnent correctement.
J'ai ajouté un numéro (colonne G ligne de séparation au-dessus) pour savoir dans quel monteur on travaille

Voici le lien

https://www.cjoint.com/c/KIEjHZ13Qv4

Le Pingou · Answer

Bonjour,
Je constate que ce n’est pas mon fichier mais une adaptation du votre.
Donc plusieurs éléments ne sont pas corrects, plage nommée pour couleurs qui est dynamique donc la plage s’adapte dès l’insertion d’un nouveau nom ; la liste des numéro pour MFC manque la fonction [=SI(L5<>"";LIGNE()-4;"")] pour attribution automatique selon ajout de nom et l’icône pour la mise à jour n’a pas de macro attribué….
Du côté des MFC le ménage n’est pas fait…(voir sur mon fichier.
Et ceci :
J'ai ajouté un numéro (colonne G ligne de séparation au-dessus) pour savoir dans quel monteur on travaille
Il n’est pas lié au monteur choisi dans la liste déroulante, donc pas d’info correct en cas de choix autre monteur.
Pour les couleurs dans planning il me semble que c’est correct sur mon fichier, je vais recontrôler le tout car je viens de voir une incohérence dans le MFC (chez moi).

Le Pingou · Answer

Bonjour,
Eh bien mon fichier fonctionne bien mais je dois modifier mon code car j'ai constaté que des MFC s'ajoutent automatiquement et l'on va avoir une montagne inutile et l'intégralité n'est pas là pour tous les monteurs (anciens et nouveaux) sur l'ensemble du graphique.
Patience.

Le Pingou · Answer

Bonjour,
Cette fois ce devrait être dans le bon sens, il n’y a plus d’intru dans la MFC (le minimum de règle nécessaire).
Le dossier : https://www.cjoint.com/c/KJbjfzG2LDn

Le Pingou · Answer

Bonsoir,
Eh bien suis content que c'est enfin correct. Ce fut laborieux car la MFC en vba m'était inconnue et j'ai de ce fait enrichie mes petites puces.
Pensée de marquer comme résolu.
En marge, j'ai vue votre message pour Grouch et j'ai constaté que vous n'avez pas repris intégralement le code de la macro [Insertion_Bloc_Monteur()]  il manque des instructions , la MFC n'a pas été adapté (contient tout un mélange de règle et pour finir le module2 est toujours présent bien que plus utilisé...dommage...!
Et voici une partie de résultat:

Bonne fin de semaine.

PHILOU10120 · Answer

Bonjour Le Pingou

Hé oui encore une erreur de ma part !
Mais si tu regardes ma signature c'est prévu

" on apprend toujours de ses erreurs "
" Il n'y a que celui qui ne fait rien qui ne se trompe pas "

Donc voici le fichier modifié et j'espère que ce coup-ci tout est ok

Le lien

https://cjoint.com/c/KJcjGAAEEl4

Le Pingou · Answer

Bonjour,
Je dirais même que celui qui ne fait pas de faute n'a certainement rien fait.
Encore un petit souci, j’ai parcouru le nouveau fichier et constate qu’il y a un contrôle formulaire à la fin (ligne 442) {Trie ordre de montage}. Il n’a rien à faire à cet emplacement car il n’y a plus de zone de tri. Sa présence, en plus, provoque une erreur de code ……’
Merci de le supprimer. Dans le cas contraire il faut adapter le code de tri pour neutraliser  l’erreur.

Le Pingou · Answer

Super comme cela tout est OK
Bon week-end

Problème dans une formule sur un planning

38 réponses

Discussions similaires

Newsletters