br44
XLDnaute Impliqué
Bonsoir le forum,
Je reviens vers vous pour savoir si il est possible de remettre à 0 une plage de cellules sous condition est après calcul?
Dans la macro qui suit j'aimerais ajouter une remise à 0 des cellules concernées en rajoutant ceci :
partie à rajouter après le calcul de la plage ("E8:E12"):
Ma question est : Comment l'écrire correctement pour que cela s'exécute automatiquement ?
Dans l'espoir d'avoir été claire dans ma demande et vous remerciant par avance de pour vos réponses .
Je vous dis à bientôt sur se fil .Amicalement BR44
Je reviens vers vous pour savoir si il est possible de remettre à 0 une plage de cellules sous condition est après calcul?
Dans la macro qui suit j'aimerais ajouter une remise à 0 des cellules concernées en rajoutant ceci :
Code:
With Sheets(Mois)
Set plage = .Range("E8:E12")
.Range("E18").Value = ""
For Each C In plage
If C.Font.ColorIndex = 5 Then
.Range("E18").Value = .Range("E18") + C.Value
End If
partie à rajouter après le calcul de la plage ("E8:E12"):
Code:
If C.Value > 0 and C.Font.ColorIndex = 5 Then.
C.Value = 0
End If
Ma question est : Comment l'écrire correctement pour que cela s'exécute automatiquement ?
Dans l'espoir d'avoir été claire dans ma demande et vous remerciant par avance de pour vos réponses .
Je vous dis à bientôt sur se fil .Amicalement BR44