XL 2013 Copier une ligne d'une feuille et la coller dans la première ligne vide d'une autre.

S

st007

XLDnaute Barbatruc

• 8 Décembre 2015

• #2

Re : Copier une ligne d'une feuille et la coller dans la première ligne vide d'une au

Bon après midi,

Code:

Sheets("Feuil1").Range("B13:BJ22").copy
Sheets("Feuil2").cells(Rows.count,"A").End(xlUp).Offset(1,0).PasteSpecial xlValues

 

Vote positif 0 Vote négatif

R

RomiHrez

XLDnaute Nouveau

• 9 Décembre 2015

• #3

Re : Copier une ligne d'une feuille et la coller dans la première ligne vide d'une au

Bonjour st007,

C'est parfait, je te remercie pour ton aide.

Bonne journée

 

Vote positif 0 Vote négatif

R

RomiHrez

XLDnaute Nouveau

• 9 Décembre 2015

• #4

Re : Copier une ligne d'une feuille et la coller dans la première ligne vide d'une au

Et si je veux la même chose qui copie colle en valeur mais en gardant le thème source ?

Merci !

 

Vote positif 0 Vote négatif

P

Philippe Tulliez

XLDnaute Nouveau

• 9 Décembre 2015

• #5

Re : Copier une ligne d'une feuille et la coller dans la première ligne vide d'une au

Bonjour,
La méthode Copy de l'objet Range à un argument nommé Destination. En utilisant celui-ci tu conserves le format source
Exemple de la copie de cellule A2:G11 de la feuille source nommée Feuil1 vers la première ligne vide de la colonne A de la feuille cible nommée Feuil2

Code:

Sub CopyRange()
  With Sheets("Feuil1").Range("A2:G11")
  .Copy Sheets("Feuil2").Cells(Rows.Count, "A").End(xlUp).Offset(1, 0)
  End With
End Sub

 

Vote positif 0 Vote négatif