Rebonjour,
Comme tu as demandé à ce que les variables soient explicitement définies (option explicit), il faut ajouter une définition de la variable i.
Private Sub Worksheet_Change(ByVal Target As Range)
Dim i as Long
If Target.Count > 1 Then Exit Sub 'on sort de la macro si plus d'une cellule modifiée
i = Target.Row ' ligne de la cellule modifiée
If i < 5 Or Target.Column <> 10 Then Exit Sub ' on sort si ligne <5 ou si colonne <>"J"
On Error Resume Next
Application.EnableEvents = False 'désactive la gestion d'évenement
Range("w" & i).Value = Target.Value 'mettre la valeur de la cellule modifier dans le meme ligne en colonne "w"
Application.EnableEvents = True 'réactive la gestion d'événement
On Error GoTo 0
MepFormule (Target.Parent) 'appel de la mise à jour des formules pour cette feuille
End Sub
Ce code doit être dans le module de la feuille sur laquelle tu veux que la gestion d'un changement de cellule soit géré.