Planning Travaux_Etude

Merci, j'ai beaucoup à apprendre en VBA.

j'avais mis un autre PJ dans mon poste précédent

Merci, intéressant.

Près de 11 secondes avec le 1 et 1,5 seconde avec le 0, donc 7 fois plus rapide !

Par contre il y a un souci avec ton dernier ficher, seule la première ligne est remplie par la macro, les autres sont effacées. Et on ne voit plus les dates à gauche.

Désolé KSIKSI1 de prolonger la discussion.

il faut commencer avec New_=Old_ voir ligne 3 ici dessous

 For co = 34 To 240
                    Old_ = .Cells(li, co).Value2     'on lit le contenu de la cellule
                    New_ = Old_              'temporairement la valeur de"new_"
                    .....
             

C'est à dire ?

Voilà ce que j'obtiens après avoir mis un chiffre en BQ6 et activé ta macro (que je n'ai pas modifiée) ;

Les date sont vides, on ne voit plus les chiffres à droite et une seule ligne s'est remplie de PR/PO.

re, oles chiffres dans les cellules bleues étaient disparues avant la nouvelle version de la macro !!! Un Moment ...

Il y a des formules jusqu'à la ligne 34, donc ce n'est pas nécessaire que la macro va plus loin.