Bonsoir,

Je souffre pour modifier le contenu de 2 cellules (H11 et i11) en fonction d'autres cellules dont M19, M20 ou M21.
Ca marche à moitié.. et ca bug à la fin

En version parlée sans code :
Par défaut j'ai H11 qui affiche "PROVISION" et i11 prend la valeur de M19.
Mais si M20 ou M21 est modifié (valeur supérieure à 0) alors H11 est modifié et i11 prend la valeur de M20 ou M21 (sachant que M21 est prioritaire sur M20 donc si M20 et M21 sont <>0, on retient la valeur de M21).
Et que lorsque les cellules M20 ou M21 sont remises à 0, H11 et i11 reviennent à leur valeur par défaut.

En mode excel, la cellule i11 avec la formule suivante :
=SI(M21<>0;M21;SI(M20<>0;M20;M19))

Avec le code:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Application.Intersect(Target, Range("m14:m15")) Is Nothing Then 'ces cellules déterminent la valeur de la cellule M19
 
Range("h11").Value = "PROVISION"
Range("i11").Value = Range("m19").Value
Else
If Not Application.Intersect(Target, Range("m20:m21")) Is Nothing Then
 
If Range("m21").Value <> 0 Then
    Range("h11").Value = "MONTANT NON AFFECTé"
    Range("i11").Value = Range("m21").Value
Else
    If Range("m20").Value <> 0 Then
        Range("h11").Value = "PROVISION"
        Range("i11").Value = Range("m20").Value
Else
Range("h11").Value = "PROVISION"
Range("i11").Value = Range("m19").Value
 
End If
End If
End If
End If
 
End Sub
Mon souci est que ca marche .. qu'une fois.. Si je change plusieurs fois les données de M20 ou M21, j'ai une erreur 1004 sur la ligne
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("h11").Value = "MONTANT NON AFFECTé"
ou sur
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Range("h11").Value = "PROVISION"
J'imagine qu'il doit falloir faire une boucle mais je bloque.
Merci pour votre retour.