Copier coller colonne

Bonjour Bawlex, Dan, le forum,

• Tu ne dis pas si le dernier fichier que je t'ai joint fonctionne chez toi ?
• On utilise la ligne 9 pour définir dercol, cette ligne contient-elle des données ?
• Attention, tu recherches "Working" et non "working".

If UCase(.Cells(9, i).Value) Like "WORKING" Then 'pour ne pas tenir compte de la casse (majuscule/minuscule)

Pour connaitre la valeur de dercol et derlig, il te suffit d'activer les 2 msgbox en enlevant le ' devant.

 dercol = i : MsgBox dercol
 derlig = .Cells(Rows.Count, dercol).End(xlUp).Row : MsgBox derlig

Je crains de ne pouvoir t'aider d'avantage,

Cordialement,

Re,

je viens d'essaye le fichier et ça marche, et c'est exactement ce qu'il me faut.

Je viens de redemarrer mon PC et de reessayer et ton code fonctionne effectivement.

je comprends pas quel était le soucis en tout cas je tiens à vous remercier pour votre disponibilité et votre rapidité.

cordialement

Salut les gars,

je sais que vous etes efficaces et réactif, j'ai un autre sujet sur lequel si vous etes d'accord, j'aimerais bien etre aidé et cela fait suite au précédent sujet.

je vous laisse le lien pour les curieux:

https://forum.excel-pratique.com/excel/creer-un-chart-waterfall-grace-a-la-detection-de-checkbox-180...

merci à vous :))

crdlt