Discussion :

[clafouty]

Bonjour à tous !

Je bute depuis un moment sur une formule/MACRO afin de pouvoir décaler une cellule vers le bas en fonction d'une date.

En gros, j'ai des taches journalières du Lundi au Vendredi, mais rien les jours féries et le week-end.
Si la personne prend du retard sur son planning, je lui rajoute une journée (cellule vide) et doit décaler toutes les cellules du dessous vers le bas. Cela décale donc le lundi au mardi, le Mardi au Mercredi et la difficulté : le Vendredi au Lundi. (Donc avec le samedi et le dimanche qui ne bouge pas).

Je n'ai pris ici qu'une partie de mon tableau mais sur l'échelle d'une année c'est très fastidieux et je souhaiterais trouver une formule pour décaler toutes les cellules d'un coup.

Je ne sais même pas si il vaut mieux utiliser une macro ou une formule. J'ai essayer la fonction DECALER mais ça ne marche pas du tout.

Merci d'avance pour vos réponses.

Très bonne journée.

[clafouty]

Bonjour, bonjour !

Pas d'idées ? Ou même de conseils pour m'orienter dans mes recherches ?

Merci beaucoup,

[Timkeeper]

Bonjour Clafouty,

Si je comprends bien ta demande, tu souhaite décaler vers le bas les données saisies d'une colonne si une cellule intermédiaire est vide ?

En ce qui concerne les formules, cela me parait impossible car une cellule est soit en saisie soit en formule. Si j'ai bien compris ta demande, tu voudrais y mettre les deux.

Je ne suis pas expert en VBA donc laisserai les développeur t'orienter plus précisément. mais je pense qu'une macro doit pouvoir t'aider.

Cordialement

[clafouty]

Bonjour Timkeeper,

Merci beaucoup pour ta réponse !

Désolé de mon imprécision, aussi je vais m'aider d'images :

Je pars de ceci :


Malheureusement, la personne ne commence pas le 23 Juillet mais le 24 Juillet. Je dois donc décaler de 1 jour le tout mais si je rajoute une cellule et décale vers le bas, je me retrouve avec ceci :


Ce qui ne convient pas malheureusement car cela me décale aussi le week-end.

En gros, la formule serait "si jour = Lundi à Jeudi il faut décaler de +1" mais si jour = Vendredi il faut décaler de 3"

Vous me direz : il suffit de copier le premier 1 en haut et le mettre tout en bas, mais j'ai simplifié via cet exemple. Dès que je décale de plus de 3 cela me fausse toute la suite.

Autres informations, je ne sais pas si c'est utile : mes cellules ne sont remplies que de textes.

Je ne connais pas du tout le VBA donc je ne sais pas du tout de quoi partir... Du coup j’espère qu'un développeur passera par là

Merci d'avance !

[clafouty]

Bonjour,

Je me permets de le UP une dernière fois avant de laisser tomber et de toujours le faire à la main.

Des conseils au moins ?

La fonction déplacer ne m'aide pas beaucoup et je n'en trouve pas d'autres.

Merci d'avance à tous ceux qui voudront bien m'aider.

[Denis la Malice]

Bonjour,

effectivement, je ne vois pas comment ne pas passer par un peu de code.

Si j'ai bien compris, il faut écrire une macro qui, à partir d'une cellule sélectionnée, va descendre dans le calendrier (vers le futur) jusqu'à trouver une cellule vide d'un jour ouvré. Dans cette cellule, il faut mettre la valeur trouvée dans le jour ouvré précédent et remonter ainsi jusqu'au point de départ. Sauf si toutes les cases occupées valent 1 dans ce cas on ne remplit que la première case vide.
Est-ce que tous les jours occupés contiennent la valeur 1 ? Peuvent-ils contenir 0,5 s'il y a une demi-journée de charge ? Peuvent-il contenir du texte quelconque qu'il faut décaler ?

Comment vois-tu le déclenchement du décalage ? On peut ajouter un bouton qui, quand on clique dessus, décale les valeurs d'une journées à partir de la case sélectionnée. On peut faire un menu contextuel : on clique bouton droit et on a le choix "Décaler d'un jour", "Décaler de 2 jours", "Décaler d'une semaine".

Comment sont gérés les jours fériés ?

Si je dois décaler une tâche de 2 jours, mais qu'il n'y a qu'une journée de vide entre la fin de la tâche courante et le début de la suivante, est-ce que ça décale la première tâche de 2 jours et la deuxième tâche d'un jour ?

A quoi ressemble la fin de ton tableau ?

S'il faut décaler à partir d'une journée qui est au milieu d'une tâche (un 1 la veille, un 1 le jour même et un 1 le lendemain), est-ce qu'après le décalage il y aura une case vide le jour même ?

Cordialement.

[Denis la Malice]

Voici un exemple d'implémentation utilisant un planning annuel dans un tableau (de type Listobject).
Le grisé des cellule est obtenu par mise en forme conditionnelle (ainsi que la mise en rouge des tâches programmées le week-end).
La colonne C est masquée. Il ne faut pas changer le nom de cette colonne dans le tableau ("SDF") sous peine de non fonctionnement.
Le code est commenté juste ce qu'il faut.
Il y a une petite astuce : si on change le nom de la feuille en "Planning 2015", alors le calendrier affiché sera celui de 2015 (sans VBA).