Concours de pétanque

Bien

Bonnes parties ☺
A+

Bonjour Dodo

Ca va ?
Je veux bien t'aider mails il me faut le mdp pour accéder au VBA

Bonjour Via,

Merci, ça va très bien,j'espère que toi également?
Pour le mdp,je ne comprends pas,je n'en ai pas mis!j'ouvre le fichier normalement.Pour ce genre de fichier, j'utilise marius comme mdp.
Bonne journée et à bientôt.
Cordialement.
Dodo

Bonjour

Oui ça va.
ça marche, je regarde ça dans la matinée

Cdlmnt
Via

Re,
https://mon-partage.fr/f/qHrqMLNc/
Activation du clignotement à l’ouverture du classeur, à l'activation de la feuille ou au changement de cellule
Le clignotement se fait 10 fois
Voir macro dans Module 1 pour changer les couleurs éventuellement
Voir macro dans le Worsheet de la feuille Phases Finales et dans This Worbook pour changer le nombre de clignotements

Cdlmnt
Vi

Re,

Le fonctionnement impeccable, sauf que j'ai mal posé le pb!Je voulais seulement la cellule B28 de l'onglet phases finales que j'ai oublié de te préciser!!!!!
Peux tu modifier?
Je ne suis pas doué du tout car je ne trouve pas tes modifs dans le développeur (module 1, Worksheet phases finales,etc...
Cordialement.
Dodo.

C'est bien seule la cellule B28 qui clignote
Par contre cela se fait sur toutes les feuilles,apparemment pas moyen de ne le faire que sur une seule feuille
Dans Module1 ce sont les chiffres 4 et 6 pour les couleurs dans la macro

Sub Clignote(c, nb)
    couleuractuelle = Range(c).Interior.ColorIndex
    If couleuractuelle = 6 Then couleuractuelle = 4
    For n = 1 To nb
       ActiveSheet.Range(c).Interior.ColorIndex = 6
       fin = Timer + 0.2
       Do While Timer < fin:  DoEvents: Loop
       ActiveSheet.Range(c).Interior.ColorIndex = couleuractuelle
       fin = Timer + 0.4
       Do While Timer < fin: DoEvents: Loop
    Next
End Sub

Dans las macros de ThisWorkbook et de la feuille Phases Finales c'est le chiffre 10 qui fixe le nombre de clignotements

 If Sheets("Phases Finales").Range("L6") <> 0 Then Clignote "B28", 10

Bonsoir Via,Mike,

Nickel, merci , j'ai simplement caché la cellule B28 des poules avec le bouton macro sur les onglets poules et tout fonctionne correctement.
Bonne soirée et bon courage.
Cdlmnt.
Dodo