copier des valeurs d'une feuille à une autre

Bonjour @+Thierry et les autres,
j'ai regardé ta demo pour karine, c'est à peu pres ce que je veux faire mais moi je veux que les feuilles 1, 2, 3 s'actualisent en fontion de ce que l'on rajoute dans la feuille home . pour info ta demo ne veut pas fontionner avec mon Excel97 de .."##"...
ça bug sur :
WS.Range("A2:C" & WS.Range("A65536").End(xlUp).Row).Copy _
Destination:=Worksheets("Home").Range("A" & _
Range("A65536").End(xlUp).Row + 1)

la methode copy de la classe range à échoué

je testerai ce soir à la maison sur 2000.

merci pour la demo et je vais analyser le code .

merci encore à vous tous

dj.run