Désolé si je ne suis pas clair
mais j'ai essayer ton code et ça ne fonctionne pas
mais en lisant ton message je comprend mieux
je pense que j'ai mis trop de ligne dans la macro
le code que j'ai posté au dessus fonctionne très bien et fait ce que je désire (faut juste que je fasse attention a ne pas avoir de case vide)
mais pour avoir le code "parfait"
j'aurai voulu test avec le tient
c'est dans la feuille "Caisse"(feuil2) que je veut effacer les cellules
"Ticket Z" étant feuil1
en fait ce qui me perturbe c'est que dans tes exemples
-(exemple pour copie vers la premiere ligne dispo en "I")
-(exemple pour copie vers la premiere ligne dispo en "H")
ce n'est pas du tout le même code (j'aurai juste changer la lettre comme si dessous)
doit je écrire
copievers Feuil2.[B30], Feuil1.Range("I:I")
copievers Feuil2.[D30], Feuil1.Range("H:H")
ou
copievers Sheets("Caisse").Range("B30"), Feuil1.Range("I:I")
copievers Sheets("Caisse").Range("D30"), Feuil1.Range("H:H")
et a quoi servent les lignes du bas entre
function et end function