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 -
michel_m Messages postés 18903 Date d'inscription Statut Contributeur Dernière intervention -
1 réponse
-
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
