Archiver données sans écraser celles d'avant

bonjour,

étant très débutante au sujet des macro, j'ai réussi à faire un copier coller de mes données vers la feuille archive, sa sa va mais après quand je clique sur le bouton archivage, sa m'écrase mes données, je voudrais que mes nouvelles données se mette au dessus avec un saut de ligne pour différencier chaque semaine. je joint mon projet.

Merci d'avance de toutes aides apporté

bonjour dorianebert

déja ton code de remise a zéro ne fonctionne pas si tu mets

Range("D14:D31").Value = 0

il faut mettre

Range("D14:D31").Value = ""

soit

= ""

mais une ligne de code suffit et remplace les autres

Range("D14:M31").Value = ""

pour l'archivage

ta macro copie mais ne colle pas

Sub archive()
Rows("14:31").Copy
Sheets("archive").Select

End Sub

elle copie et sélectionne seulement la feuille mais ne colle pas

bon je te laisse pour le moment car je ne peut pas plus mais je vais suivre le post

Bonjour,

Une proposition :

A+

c'est parfait, merci beaucoup, sa faisait 3 jours que je me prenait la tête la dessus. et par hazard es-ce que c'est possible de mettre la cellule en rouge quand la valeur est supérieur à 10 ?

merci

De quelle cellule parles-tu ?

A+

Sa peut-être n'importe laquel selon les jours. Dès que je mettrait un chiffre au dessus de 10 dans différentes cellules sa la colloriserait direct.

merci pour l'attention, j'ai réussi à trouver en faisant une mise en forme conditionnelle.

merci encore de m'avoir aider.