Copier les valeurs sur un autre classeur

liodu74 Messages postés 1 Date d'inscription   Statut Membre Dernière intervention   -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour je souhaite copier que les valeurs et non les formules sur mon classeur

1 réponse

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    Plutôt que de mettre une photo qui oblige copier et retaper des lignes de ton code, emploie à l'avenir les balises de codes

    d'avance Merci

    en supposant que A2 n'est pas vide

    Dim Tampon, Derlig As Long

    Tampon = ash.Range("A3:AR2000")

    With sh
    Derlig = .Columns("A").Find("", .Range("A2")).Row
    Range("A" & Derlig).Resize(UBound(Tampon), 44)) = Tampon
    End With

     Michel
    0