Besoin d'aide VBA

Résolu
J-Art Messages postés 19 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonsoir a tous,

j'ai des données sur une plage de données qui est dans une feuille que je veux pouvoir copier sur une autre feuille à un endroit précis. J'ai essayé cette formule et elle ne marche pas...

Worksheets("2016").Range("M1:R45").Copy
Worksheets("Fiches de salaire").Range("AA1:AF45").Paste

2 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
Bonjour
Option Explicit
Sub copier()
Dim tampon
tampon = Sheets"2016").Range("M1:R45")
Sheets("Fiches de salaire").Range("AA1:AF45") = tampon
End Sub

0
Gyrus Messages postés 3334 Date d'inscription   Statut Membre Dernière intervention   526
 
Bonjour,

Tu peux également appliquer
Worksheets("2016").Range("M1:R45").Copy
ActiveSheet.Paste Worksheets("Fiches de salaire").Range("AA1")

ou plus simplement
Worksheets("2016").Range("M1:R45").Copy Worksheets("Fiches de salaire").Range("AA1")


A+
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 315
 
En général en VBA, on évite au maximum les copy-paste
0