salut a tous
après avoir valider ma date je voudrai le curseur en cellule B et
que ça me rajoute une ligne en dessous avec les formules peut importe ou je rajoute
la date
Sub InsererSousAvecFormules()
Application.ScreenUpdating = False
ActiveCell(2).Resize(1).EntireRow.Insert
ActiveCell(1).EntireRow.Copy ActiveCell(2).Resize(1).EntireRow
On Error Resume Next 'au cas où il n'y ait pas de constantes
ActiveCell(2).Resize(1).EntireRow. _
SpecialCells(xlConstants).ClearContents