Tirage et cumul

Bonjour,
Selon la pièce jointe, quand je clique sur tirage la déduction de 0,50€ se fait a la fin du tirage. Serait-il possible de le faire au moment du clic Tirage.
J'ai essayé de remonter le code Range("J16").Value = Range("J16").Value + Range("J19").Value,
ça marche a part que la déduction de 0,50€ dans la cellule J16 ne se fait pas et quand il y a gain le cumul dans la cellule J16 ne se fait pas aussi.
Petite question subsidiaire mais pas nécessaire, serait-il possible de faire clignoter les cellules lorsqu'elles deviennent verte.
Merci beaucoup

https://www.cjoint.com/c/KCpmZTBrg8l