Re : Sauvegarder historique d'une feuille à une autre.
J'aimerai fusionner votre code avec ce code ci:
Private Sub Worksheet_Change(ByVal Target As Range)
temp = Application.CountA(Sheets("Historique_modif").Range("a:a")) + 1
Sheets("Historique_modif").Cells(temp, 1) = Target.Address
Sheets("Historique_modif").Cells(temp, 2) = Now
Sheets("Historique_modif").Cells(temp, 3) = Target
Sheets("Historique_modif").Cells(temp, 4) = Environ("username")
End Sub
Comment faire?
En outre, je voudrais répéter votre processus pour introduire dans une autre feuille, d'autre données issues d'autres cellules (par exemple type de contrat)