copie une plage si elle n'exsiste pas dans une autre page

[abd.gh]

ami(e) du jour, bonjour

mon objectif est de faire une mise à jour,

j'ai un petit problème avec mon code,

si sheets("1").range("A" & compteur & ":H" & compteur) n’existe pas dans la
sheets("2").range("A" & partout & ":H" & partout) alors
copie sheets("1").range("A" & compteur & ":H" & compteur) dans
sheets("2").range("A" & aLAfin & ":H" & aLAfin)

aLafin=[2!A:A].Find("").Row
et comment définir ce "partout" pour q'il puisse, à chaque boucle, balayer toute la page(tous les lignes) !

j'espère que je suis claire dans ma demande

merci pour toute aide

 

[mth]

Re : copie une plage si elle n'exsiste pas dans une autre page

Bonjour abd.gh

j'espère que je suis claire dans ma demande

Je crains que non, tu devrais joindre un extrait de fichier en expliquant ce que tu entends par "une plage n'existe pas dans une autre plage"

Bien à toi,

mth

 

[abd.gh]

Re : copie une plage si elle n'exsiste pas dans une autre page

Re

sheet("1") : tous mes produits de tous l'année
sheet("2") : produits mensuel

Range("A" & compteur & ":H" & compteur ).Value not exists in sheets("RFQ").range("A" & aLAfin & ":H" & aLAfin).select Then

code

end if


en PJ ça sera plus compliqué vu que mon fichier est bien complexe

merci