XL 2010 Modifier les données d’un tableau comportant plusieurs colonne

[Yli]

Bonjour auriez vous une astuce pour :
J’ai un tableau avec en exemple : 300 lignes et 25 colonnes
Je modifie la ligne 100 col 10 et 15
J’aimerais retrouver facilement sur un autre onglet les modifications apportées.

Un grand merci

 

[gbinforme]

Bonjour,

Avec ce code à mettre dans la feuille de ton tableau et une feuille "Modifs" que tu peux adapter tu auras par date les modifications apportées.

Option Explicit
Dim avt As Variant
Private Sub Worksheet_SelectionChange(ByVal sel As Range)
    avt = sel.Value
End Sub
Private Sub Worksheet_Change(ByVal sel As Range)
Dim der As Long
    With Sheets("Modifs")
        der = .Cells(Rows.Count, 1).End(xlUp).Row + 1
        .Cells(der, 1).Value = Now
        .Cells(der, 2).Value = sel.Address(0, 0)
        .Cells(der, 3).Value = avt
        .Cells(der, 4).Value = sel.Value
    End With
End Sub