Copie de lignes avec formules vers le bas

Bonjour,

1er apparition sur le forum, excusez donc mes maladresses.

Comment faire une macro pour copie, vers le bas, de lignes 1, 2 (contenant des formules) et 3 (3 étant vide pour aérer) ? Puis 4,5 et 6 sur 7, etc. J'ai créé la macro mais les formules ne sont pas reprises !

(Exemple de la demande : Ligne 1 > A1 = 1, A2 = 1+A3, A3 = 1, ligne 2 > B1 = 2, B2 = 1+B3, B3 = 2, ligne 3 > vides)

Merci beaucoup

Bonjour et bienvenue

Merci de joindre un fichier car j'ai l'impression que tu confonds LIGNE et COLONNE

Amicalement

Nad

Oui exact, désolé,

pour la feuille 1 ce serait vers le bas et un autre fichier vers la droite (la même chose en colonne).

J'ai joint le fichier pour le premier cas

Merci de votre aide

Bonsoir,

Sub CopiePlage()
Dim Lg%
    Lg = Range("a65536").End(xlUp).Row + 1
    Range("a3:d5").Copy Destination:=Range("a" & Lg)
End Sub

Amicalement

Claude

Merci Claude, c'est génial ! Ca fonctionne très bien

Pourrais-tu, stp, en complément, modifier le code pour garder la mise en forme des cellules (hauteur)

et copier à chaque fois les dernières nouvelles lignes ?

Quelle appellation du code faut-il changer pour adapter cette manip pour coller en colonnes plutôt qu'en lignes ?

Merci pour ton aide précieuse !

Amicalement

Bonjour,

C'est un autre sujet, ouvre un nouveau poste avec fichier exemple

Amicalement

Claude