micpid a écrit :
Merci beaucoup,
j'ai testé le fichier mais quand j’exécute la macro pour ajouter une ligne, le total ne ne fait plus dans la cellule c2
Cordialement
Pour afficher un résultat correct, il est nécessaire qu'une date soit affichée dans la colonne 1 (dans la nouvelle ligne :
Une date ou un point ou un espace...)
Tu pourrais faire :
Sub Ajout2()
Rows("4:4").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromRightOrBelow
Range("A4") = " "
Range("A4").Select
End Sub
A+