Copie Coller de lignes sur la même feuille
V
Bonjour le forum
Je reviens vers vous avec un autre pb de copie coller different de la dernierer fois, , je m' explique je voudrais faire une copie de la plage A2:F3 et la coller à partir de la cellule A20 à la premiere ligne vide sur la meme feuille. Merci d' avance pour l' aide que vous pourrez m' appoorter.
Cdlt
Bonjour Valo, bonjour le forum,
Essaie comme ça :
Sub Macro1()
Dim OA As Worksheet 'déclare la variable OA (Onglet Actif)
Dim DEST As Range 'déclare la variable DEST (cellule de DESTination)
Set OA = ActiveSheet 'définit l'onglet OA
'définit la cellule de destination DEST (A20 si A20 est vide, sinon la première cellule vide de la colonne 1 [=A])
Set DEST = IIf(OA.Range("A20").Value = "", OA.Range("A20"), OA.Cells(Application.Rows.Count, 1).End(xlUp).Offset(1, 0))
OA.Range("A2:F3").Copy DEST 'copy la plage A2:F3 et la colle dans DEST
End SubV
Bonjour ThauThème et le forum
Merci pour ta réponse rapide, j' ai éffectué un test et la macro fonctione bien por le Copie colle
mais c' est qu' elle est ficgé car si j' efface les anceinne ligne s A2:F3 et les remplace par d' autres données, j' aimerais recopier aussi les nouvelles lignes à la suite das premieres.
Cdlt