Besoin d'aide VBA

Résolu
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

  1. Contributeur
    Bonjour
    Option Explicit
    Sub copier()
    Dim tampon
    tampon = Sheets"2016").Range("M1:R45")
    Sheets("Fiches de salaire").Range("AA1:AF45") = tampon
    End Sub

    0
    1. 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
      1. Contributeur
        En général en VBA, on évite au maximum les copy-paste
        0