Insérer une ligne qui conserve les formules précédentes

Bonjour!

J'aimerais trouver une macro qui permettrait d'insérer une ligne à la suite d'un tableau qui conserve la mise en forme et les formules des cellules au dessus.

Quelqu'un aurait-il une idée???

Je suis un peu à court de ressources.

Merci!!

Voir fichier en pièce jointe pour visualiser mon problème.

Bonjour

Volley1 a écrit :

Quelqu'un aurait-il une idée???

A tester cette macro

Option Explicit

Sub Insertion()
Dim Ligne As Long

  Ligne = Range("A2").End(xlDown).Row
  Range("A" & Ligne & ":L" & Ligne).Copy
  Range("A" & Ligne + 1 & ":L" & Ligne + 1).Insert shift:=xlShiftDown
  Application.CutCopyMode = False
  On Error Resume Next         ' On supprime les constantes
  Range("A" & Ligne + 1 & ":L" & Ligne + 1).SpecialCells(xlCellTypeConstants, 23).ClearContents
  On Error GoTo 0
End Sub

Wow, quelle rapidité! Merci beaucoup, c'est parfait