Bonsoir le forum, bonsoir René,
voici une petite macro qui recherche la première cellule non vide
(en colonne 2) en partant du bas, selectionne la ligne, en inserre une, puis coupe la ligne du dessous pour la coller au dessus.
Sub ajouteligne()
Columns(2).Find("*", , , , , xlPrevious).Select
Selection.EntireRow.insert
Selection.EntireRow.Value = Selection.Offset(1, 0).EntireRow.Value
Selection.Offset(1, 0).EntireRow.Value = ""
Selection.Offset(1, -1).Select
End Sub
ceci doit pouvoir répondre à ta question.
bon excel @ +