Discussion :

[Nico Co]

Bonjour,
N'étant pas expert vba, j'ai besoin d'aide.
Je souhaite sur ma feuille 1 copier les lignes 9 à 12 et les coller à chaque fois qu'au sein de la colonne B à partir de la ligne 13 j'ai une valeur différente à celle du dessous.
Sachant que mon résultat à partir de la ligne 13 n'est pas figé (seul les lignes 1 à 12 reste fixent).

J'ai cherché sur les forums je n'ai pas trouvé la solution.
La macro ci-dessous permet d'insérer des lignes. Mais pas les lignes 9 à 12.
L'autre problème c'est qu'elle démarre en au de la colonne au lieu de la ligne 13.

1.For Each elm In ActiveWorkbook.ActiveSheet.UsedRange.Columns("B").Cells
2. If elm.Value <> "" And elm.Value <> elm.Offset(1).Value Then
3. elm.Offset(1).EntireRow.Insert xlDown
4. End If
5. Next elm
6. Rows("13:13").Select
7. Selection.Delete Shift:=xlUp

J'ai intégré une fichier PJ afin d'illustrer mon besoin. En feuille 1 la présentation des données de départ et en feuil2 le résultat attendu.
Merci