Bonjour, Alain
Il faut nommer les lignes
1) sélectionne les lignes 34:35
2) clique sur le menu Insertion/Nom/Définir...
3) dans la boîte de dialogue, dans le champ du nom, tape ceci : Cadre1
4) valide
5) sélectionne la ligne 44
6) clique sur le menu Insertion/Nom/Définir...
7) dans la boîte de dialogue, dans le champ du nom, tape ceci : Cadre2
8) valide
change ton code (les parties en gras) :
Rows("Cadre1").Select
Selection.Insert Shift:=xlDown
Range("C17:K18").Select
Selection.Copy
Range("C34").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Rows("Cadre2").Select
@+Jean-Marie