Bonjour a tous !
 
Je cherche en fait à copier une plage de cellule contenu sur une feuile et la coller sur une autre
 
Voila mon code :
With Worksheets("Argentine FSI" )
    .Range("Argentine_FSI" ).Select
    Application.CutCopyMode = xlCopy
    Selection.Copy
End With
With Worksheets("Maroc" )
    .Range("A3" ).ActiveCell
    Selection.Paste
End With
 
Et evidement j'ai des erreurs !
 
Ou sont elles donc ces petites cokinettes ?
 
Merci à tous !

pas de jeu des 7 erreurs pour cette fois, parcontre, à part le activecell qui peut etre modifier, quelle erreur te pond le prog ?

que veux tu faire avec cette ligne : .Range("Argentine_FSI" ).Select
 
je pense que tu veux copier l'ensenble de la feuille Argentine FSI vers la feuille Maroc, dans ce cas il te suffit de faire :
 
Cells.Copy
Sheets("Maroc" ).Paste

propriété ou méhode non gére avec cet objet en pointant sur la ligne .Range("A3" ).ActiveCell
 
En fait sur la feuille argentine, j'ai une plage de cellule calculée avec la fonction DECALER appelée "Agentine_FSI", et je voudrais copier cette plage dans une autre feuille a partir de la ligne 3 (d'ou le .Range("A3" ).ActiveCell  
)
 
Voila merci

.activate marchera mieux je pense

la methode activate de la classe range a echoué
 
marche pas non plus
 
ptete parce ke je ve coller toute une plage de données dans une seule cellule ?

Worksheets("Argentine FSI" ).Range("Argentine_FSI" ).Copy
Sheets("Maroc" ).Select
Sheets("Maroc" ).Range("A3" ).Select
ActiveSheet.Paste

GG Paul Hood p:p:p
 
merci beaucoup au forum hardware
 
bonne aprem à tous

bonjour,
En principe on évite de sélecter inutilement une seule ligne devrait suffire :
 
Worksheets("Argentine FSI" ).Range("Argentine_FSI" ).Copy Sheets("Maroc" ).Range("A3" )
 
A+