Bonjour,
Il y a un moyen de rendre ce code plus simple et plus rapide ?
Remplir les cellules J et jusqu'à AB avec n de la ligne active par double clic.
If Not Intersect([J6:J600], Target) Is Nothing Then
a = Array("n")
p = Application.Match(Target, a, 0)
If IsError(p) Then...