Je souhaitrai avoir une macro excel qui m'insère 20 lignes quand il détecte le terme "Consigne de sécurité et Environnement:" dans la cellule O.
Ce lien n'existe plus
Voici un fichier joint comme exemple. J'ai fais manuellement les 2 premiers de la colonne O (en rouge). Vous pouvez constater que le fichier fais plusieurs millier de ligne, que le décalage des lignes ce fait vers le haut, que la colonne O ne comporte que le terme a rechercher et que les colonnes de A à F se copie d'elle même sur les 20 lignes qui ont étaient insérés.
J'ai bien conscience de la difficulté de ma demande. Une macro m'insérant les lignes suffira si le copie collage des colonne A à F serait trop compliqué a programmer.
Sub insertion()
For i = Range("O1048576").End(xlUp).Row To 2 Step -1
If Cells(i, 15) = "Consigne de sécurité et Environnement:" Then
Rows(i).Select
For j = 1 To 20
Selection.Insert Shift:=xlDown
Next j
End If
Next i
End Sub