COPIER COLLER

Bonjour à tous

j'ai ce qui suit pour recuperer des donnée d'une autre feuil excel
ca fonctionne mais est il possible de copier coller que les valeurs (comme
avec collage special dans la feuil)
j'ai essaye avec l'enregistreur ca ne fonctionne pas

Workbooks("ZAZA.XLS").Sheets("FEUIL1"). _
Range("A1:AN" & Workbooks("ZAZA.XLS"). _
Sheets("FEUIL1").[A65536].End(3).Row). _
Copy Workbooks("TOTO.XLS").Sheets("FEUIL2").[A1]

Merci--
IMER09

Salut à toi

Essaies ceci :

Workbooks("ZAZA.XLS").Sheets("FEUIL1"). _
Range("A1:AN" & Workbooks("ZAZA.XLS"). _
Sheets("FEUIL1").[A65536].End(3).Row). _
Copy
Workbooks("TOTO.XLS").Sheets("FEUIL2").[A1].PasteSpecial Paste:=xlPasteValues


Celà devrait te convenir

Bonjour à tous

j'ai ce qui suit pour recuperer des donnée d'une autre feuil excel
ca fonctionne mais est il possible de copier coller que les valeurs (comme
avec collage special dans la feuil)
j'ai essaye avec l'enregistreur ca ne fonctionne pas

Workbooks("ZAZA.XLS").Sheets("FEUIL1"). _
Range("A1:AN" & Workbooks("ZAZA.XLS"). _
Sheets("FEUIL1").[A65536].End(3).Row). _
Copy Workbooks("TOTO.XLS").Sheets("FEUIL2").[A1]

Merci--
IMER09