Effacement données sur plage fluctuante

Bonjour le Forum!!!

sur le fichier joint les données de mon problème, si quelqu'un peu m'aider je l'en remercie d'avance

Bonjour

Cela te convient-il ?

Rebonjour gmb !!!

cela est parfait, je te remercie beaucoup.

si je peux me permettre une question pourquoi si je clic sur le bouton 2 x de suite le code efface des lignes au dessus de la ligne 16.

Quoiqu'il en soit je te remercie pour ton aide qui me permets d'avancer dans la construction de mon planning, j'y intègre ton code tous de suite, je vais essayer de bloquer l’effacement pour qu'il passe pas au dessus de la linge 16.

je te souhaite une bonne journée

re-Bonjour

Tu écris :

...pourquoi si je clic sur le bouton 2 x de suite le code efface des lignes au dessus de la ligne 16.

Réponse :

Parce que c'est un bug. Je n'avais pas imaginé que l'on puisse être tenté d'effacer un tableau vide.

Mais, qu'à cela ne tienne !

Remplace dans le code la ligne :

DerLn =  Range("C" & Rows.Count).End(xlUp).Row

par :

DerLn = WorksheetFunction.Max(16, Range("C" & Rows.Count).End(xlUp).Row)

et tu pourras cliquer autant de fois que tu voudras sur le bouton bleu sans que plus rien ne se passe... du moins je crois.

Bye

Bonjour gmb

encore une fois merci pour ton aide tous fonctionne parfaitementhttps://forum.excel-pratique.com/posting.php?mode=reply&f=2&t=43593&sid=e6fcf84846a4f269f81745a7f386cc86#

je te souhaite une bonne journée bye