Bonjour @ tous
 
Revoici la KichE akaXYZ aka Théodore.
J'ai ici un petit bout de code pour insérer une ligne dans un tableau.
L'idée est d'aller à la dernière ligne remplie, puis de descendre de 1 ligne puis d'insérer ma ligne là.
 
Le truc c'est que j'ai plusieurs cellules avec des formules donc je veux sélectionner la ligne du dessous (celle qui avait les formules et qui a été repoussée) et "tirer les formules".
 
Voici:

Sub ajouter_lignes()
Range("A25" ).Select
    Selection.End(xlDown).Select
        ActiveCell.Offset(1, 0).Select
        Selection.EntireRow.Insert
            ActiveCell.Offset(1, 0).Select
            Selection.EntireRow.Select
                Range(Selection, Selection.EntireRow).Select
                Selection.AutoFill Destination:=Range("XXX" ), Type:=xlFillDefault
                Range("XXX" ).Select
    ActiveCell.Select
End Sub

 
Je bloque au niveau du range de destination, je ne sais pas comment écrire ça en ref relative.
 
Merci de vos contributions.
 
Théodore

Si tu récupère la ligne et la colonne de la cellule, tu peux écrire ça comme ça:
 

 
Tout dépend de la plage que tu souhaites.