planning automatique

Bonsoir jacques,

lien fichier : https://www.cjoint.com/c/NHfsJeZtXx0

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

* à l'ouverture du fichier, tu es sur la 3ème feuille "planning lieux" ;
vérifie que c'est bien entièrement vide en B2:AY3.

* va sur la 2ème feuille "agent 2" ; en A1, au lieu de "AGENT tutu",
j'ai mis "paul" ; comme tes dates n'étaient pas normalisées, pour la
plage B3:C18, j'ai mis ce format de date : jjjj j mmmm aaaa ; ainsi,
par exemple pour B12, tu saisiras 15/1 ➯ lundi 15 janvier 2024.

* va sur la 1ère feuille "agent 1" ; en A1, au lieu de "AGENT TOTO",
j'ai mis "marc" ; comme tes dates n'étaient pas normalisées, pour la
plage B3:C18, j'ai mis ce format de date : jjjj j mmmm aaaa ; ainsi,
par exemple pour B9, tu saisiras 1/1 ➯ lundi 1 janvier 2024 ; car
c'est bien un lundi, pas un dimanche comme tu l'avais mis avant ;
cette façon de saisir t'évitera aussi des fautes de frappe comme
dans ton ex-B9 "dimnanche 1 janvier 2024" ou dans ton ex-C18
"10 fervier 2024" (au lieu de 10 février 2024).

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

* fais Ctrl e ➯ travail effectué : ton planning est rempli.  :)  note :
tu peux faire Ctrl e depuis n'importe quelle feuille ➯ tu aurais pu
faire Ctrl e depuis la feuille "agent 2" ou même "planning lieux",
ça aurait abouti au même résultat ; c'est inutile d'effacer les
anciens résultats : c'est fait automatiquement par la macro.

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

* si tu ajoutes des feuilles agent ou si tu supprimes des feuilles
agent : c'est inutile de modifier le code VBA : toutes les feuilles
agent seront prises en compte automatiquement.

* sur la feuille "planning lieux", si tu ajoutes d'autres colonnes date :
c'est inutile de modifier le code VBA : ça détecte automatiquement
la dernière colonne date ➯ toutes les colonnes date sont prises en
compte.

* c'est pas obligé que la feuille "planning lieux" soit la dernière
du classeur : ça marchera aussi bien si tu la déplaces en 1ère
position (donc en tant que 1ère feuille), ou si tu as envie de
la déplacer ailleurs (entre 2 feuilles agent).

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

* fais Alt F11 pour voir le code VBA ; puis fais de nouveau
Alt F11 pour revenir sur Excel.

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

à te lire pour avoir ton avis.  :)

rhodo

bonjour et franchement super de chez super

par contre j aimerais pouvoir rajouter des lieux . est il possible que je modifie le vba pour lui dire de chercher dans les onglets agents de  la colonne B a la colonne F et si je rajoute un lieux j aurais juste a modifier la lettre de la dernière colonne .je dois pouvoir lui indiquer la dernière colonne car il y a après d'autres tableaux que j ai créé. les colonnes qui sont avant la colonne de date sur les fiches agents seront masquées pour l utilisateur

J'ai mis en pièce les vrai tableaux. je ne pensais pas à du vba pour cela que j avais mis des exemple 

merci encore

https://www.cjoint.com/c/NHgihivHmun

Bonjour jacques,

désolé pour le très gros retard, mais hier je n'étais pas disponible.  :(

je suis ravi que mon 1er fichier "Exo jacques" t'a plu !  :)

ton 2ème fichier "Modèle planning jjj" en retour :

https://www.cjoint.com/c/NHgxwbWxcl0

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

fais Ctrl e ➯ travail effectué : ton planning est rempli.  :)

regarde bien les 3 cellules dont le texte est « * » ; c'est en H2 ; M3 ; O4 ;
sans cliquer, mets juste dessus le curseur de la souris.  ;)

faisons un autre essai : en A1, mets 2025 ; fais Ctrl e ; note que c'est
correctement rempli, même quand le 1er jour est en colonne D car
c'est vide en B2:C4.  :)

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

sur les feuilles agent, tu peux ajouter autant de lieux que tu veux,
même si ça dépasse à droite la colonne F ; tu n'auras pas besoin
de modifier le code VBA, et tous les lieux seront pris en compte.

sur la feuille "planning lieux", tu devras ajouter manuellement
les nouveaux lieux (à partir de A5 et en dessous) ; bien sûr,
pour toutes les lignes ajoutées, il faudra mettre un quadrillage
à droite (ça sera un peu fastidieux, mais pas trop).  ;)

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

plus tard, si tu voudras renommer la feuille "planning lieux"
en "planning", tu devras faire un seul changement dans
le code VBA ; au lieu de : Const shp$ = "planning lieux"
il faudra : Const shp$ = "planning"

- - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -

à te lire pour avoir ton avis.  :)

rhodo

oua et bin c'est genial merci  encore