Discussion :

[Runsh63]

Bonjour,

Je cherche à recopier les cellules de A à O d"une ligne identifiée pour la dupliquer un certain nombre de fois.
Pour se faire, j'utilise ce bout de code.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
CellsToCopy = .Range("A3").End(xlDown).Offset(1, 0).Row
 
        .Range("A" & CellsToCopy & ":O" & CellsToCopy).Copy .Range("A" & CellsToCopy & ":O" & CellsToCopy + MyCounter - 1).Insert(Shift:=xlDown)

et là Excel me ramène la fameuse erreur 1004.
Je ne vois pas où j'ai mal codé.
Pour info, la variable MyCounter est définie plus haut, comme un entier et dans mon test elle prend la valeur de 3 donc je ne pense pas que le problème vienne de là.

Une âme charitable pourrait-elle m'éclairer et me dire où est-ce que j'ai mal écrit SVP?

Merci d'avance et très bonne journée à toutes et tous.

[unparia]

Bonjour
les deux lignes de code que tu montres sont apparemment dans un bloc with que tu ne montres pas.
Quel est-il ?