VBA - Incrémenter série jours ouvrés

[Chris401]

Bonsoir

Je cherche un code pour incrémenter des jours ouvrés selon un nombre variable.
Explications dans le fichier joint.

Merci pour votre aide.
Cordialement
Chris

 

[Dormeur74]

Re : VBA - Incrémenter série jours ouvrés

Essaye ceci pour voir.

 

[Chris401]

Re : VBA - Incrémenter série jours ouvrés

Bonjour Dormeur

Merci de t'être penché sur ma demande.

Avec ton code, c'est toute l'année qui se met en place.

Peux-tu faire en sorte qu'il soit possible de choisir un jour de début et un jour de fin STP ?
Cela car chaque semaine les noms vont changer.

Cordialement
Chris

 

[Modeste geedee]

Re : VBA - Incrémenter série jours ouvrés

Bonsour®

Bonsoir

Je cherche un code pour incrémenter des jours ouvrés selon un nombre variable.

en C2 de la feuille BASE
formule :
=SERIE.JOUR.OUVRE(A2;Liste!$D$1;Feries)
format :
jj mmmm aaaa
à recopier vers le bas autant que necessaire...

 

[Chris401]

Re : VBA - Incrémenter série jours ouvrés

Bonjour Modeste

Malheureusement la formule ajoute n jours - Moi, je veux n fois le même jour avant d'incrémenter la date.

Merci de ton aide.
Cordialement
Chris

 

[Modeste geedee]

Re : VBA - Incrémenter série jours ouvrés

Bonsour®

Malheureusement la formule ajoute n jours - Moi, je veux n fois le même jour avant d'incrémenter la date.

autre proposition sans utiliser SERIE.JOUR.OUVRE

 

[Dormeur74]

Re : VBA - Incrémenter série jours ouvrés

Bonjour Modeste geedee

Peux-tu faire en sorte qu'il soit possible de choisir un jour de début et un jour de fin STP ?

C'est possible sur une même année. Cela dit, il est facile de supprimer sous Excel les lignes inutiles.
Sinon, c'est tout l'algorithme qu'il faut revoir, car cette notion de semaine n'était pas dans l'expression du besoin (on n'est jamais assez précis).

Je m'en explique.
Si tu veux afficher la dernière semaine de l'année (qui obéit aux règles ISO européennes et non pas aux règles US de Microsoft), il faut tout reprendre à zéro, car on est à cheval sur deux années successives. Ce qui change tout.

Donc si tu veux automatiser un calendrier, mieux vaut tout dire au départ. Quitte à passer un peu plus de temps sur le cahier des charges.
Exemple : si ton application est faite pour fonctionner aux USA, il faut savoir que le code du premier jour de la semaine n'est pas le même que celui du vieux continent et qu'il en est de même pour le n° de la semaine du 1er de l'an.

 

[Modeste geedee]

Re : VBA - Incrémenter série jours ouvrés

Bonsour®

Malheureusement la formule ajoute n jours - Moi, je veux n fois le même jour avant d'incrémenter la date.

si c'est pour générer la base ... ??
il faut pour chaque nom dans la liste
- indiquer les dates d'application (debut-fin de contrat)

préciser également les dates de debut et fin de base

utiliser une macro !!

Edit :
Bonjour Dormeur74

Donc si tu veux automatiser un calendrier, mieux vaut tout dire au départ. Quitte à passer un peu plus de temps sur le cahier des charges.

 

[Chris401]

Re : VBA - Incrémenter série jours ouvrés

Re

Moi qui pensais que ma demande était claire dans mon fichier, j'ai tout faux.

J'essaye d'expliquer ce que j'attends :

Feuille Liste : Chaque semaine, j'ai le nombre d'employés qui peut changer (et donc leurs noms)
Exemple : 7 noms

Par un click bouton, une macro se déclencherait qui demanderait la date de début et la date de fin
Exemple Début : lundi 27/05/2013 Fin : vendredi 31/05/13
Il y a donc 5 jours ouvrables

Il faudrait donc que dans la 1ère cellule vide de la colonne A on trouve 5 x 7 lignes :

7 x le lundi 27/05/2013
7 x le mardi 28/05/2013
7 x le mercredi 29/05/2013
7 x le jeudi 30/05/2013
7 x le vendredi 31/05/2013

Si Début = Lundi 6 mai 2013 et Fin = Vendredi 10 mai 2013, on aurait 3 jours ouvrables et en colonne A on aurait 3 x 7 lignes :

7 x le lundi 06 mai 2013
7 x le mardi 07 mai 2013
7 x le vendredi 10 mai 2013

Bien sûr, les noms doivent être également copiés en colonne B

Les autres colonnes de la feuille BASE sont remplies par d'autres informations que je saisis manuellement chaque jour.

En espérant avoir été plus explicite.

Merci beaucoup
Chris

 

[Dormeur74]

Re : VBA - Incrémenter série jours ouvrés

Le problème à traiter est complètement différent. Je n'ai pas de compétences suffisantes sous Excel 2010 pour te proposer une "formule tableur" ad hoc (j'ai bien aimé la proposition archi-courte de Modeste geedee), mais te ferai une nouvelle proposition avec le n° de la semaine "européenne" comme point d'entrée.

 

[Modeste geedee]

Re : VBA - Incrémenter série jours ouvrés

Re

Moi qui pensais que ma demande était claire dans mon fichier, j'ai tout faux.
Par un click bouton, une macro se déclencherait qui demanderait la date de début et la date de fin
Exemple Début : lundi 27/05/2013 Fin : vendredi 31/05/13
Bien sûr, les noms doivent être également copiés en colonne B

pourquoi une macro ???

 

[Dormeur74]

Re : VBA - Incrémenter série jours ouvrés

J'ai pris la copie d'écran que tu nous as donnée. Attention à la semaine qui est à cheval sur 2 années consécutives, le 1er de l'an doit être ajouté dans la feuille "Férié".

 

[Chris401]

Re : VBA - Incrémenter série jours ouvrés

Bonjour

Merci beaucoup.
Je vais me servir de ce dernier code.

Cordialement
Chris