De nombreuses personnes utilisent les fonctionnalités de mise en forme conditionnelle d’Excel pour attirer l’attention sur des valeurs ou des zones spécifiques de leurs feuilles de calcul. Par exemple, une cellule peut être formatée de sorte que son contenu soit affiché en rouge ou en gras s’il est supérieur ou inférieur à un certain seuil.

Ce qui manque, cependant, c’est un moyen de faire clignoter le contenu d’une cellule ou de clignoter. Pour un tel exploit, vous êtes laissé à vous-même et au miracle des macros. En utilisant ces outils, vous pouvez faire clignoter les cellules en concevant d’abord un style spécial pour les cellules clignotantes, puis en exécutant une simple macro.

Pour créer le style spécial, procédez comme suit:

  1. Sélectionnez la cellule que vous souhaitez activer et désactiver. (Assurez-vous que la cellule contient quelque chose; elle ne doit pas être vide.)

  2. Assurez-vous que l’onglet Accueil est affiché sur le ruban.

  3. Dans le groupe Styles, cliquez sur Styles de cellule. Excel affiche des sélections de styles prédéfinis.

  4. Choisissez Nouveau style de cellule. Excel affiche la boîte de dialogue Style. (Voir la figure 1.)

  5. Dans la zone Nom du style, entrez le nom « Clignotant » (sans les guillemets).

  6. À l’aide des commandes de la boîte de dialogue, modifiez les attributs du style à votre guise.

  7. Cliquez sur OK.

Une fois le style défini, vous devez l’appliquer à toutes les cellules que vous souhaitez « flasher ». Assurez-vous de n’appliquer le style à aucune autre cellule.

Créez maintenant les macros (il y en a deux), comme suit:

Dim NextTime As Date

Sub StartFlash()

NextTime = Now + TimeValue("00:00:01")

With ActiveWorkbook.Styles("Flashing").Font         If .ColorIndex <> 2 And .ColorIndex <> 3 Then             .ColorIndex = 3         End If         .ColorIndex = 5 - .ColorIndex     End With     Application.OnTime NextTime, "StartFlash"

End Sub
Sub StopFlash()

Application.OnTime NextTime, "StartFlash", schedule:=False     ActiveWorkbook.Styles("Flashing").Font.ColorIndex = xlAutomatic End Sub

Pour faire clignoter les éléments, exécutez simplement StartFlash. Les cellules formatées avec le style Flashing alterneront entre le texte rouge et blanc environ une fois par seconde. Lorsque vous souhaitez désactiver le clignotement, exécutez simplement la macro StopFlash.

La macro fonctionne en modifiant le style que vous avez défini précédemment, plus haut dans cette astuce. (Assurez-vous absolument que vous nommez le style « Clignotant »,

comme indiqué à l’étape 5.) Tout ce qu’il fait est de changer la propriété ColorIndex afin qu’elle bascule entre deux valeurs – 3 et 2. Ce changement dans le style se traduit par un effet clignotant lorsque la couleur du texte passe du rouge (3) au blanc (2) et inversement.

Il y a une autre chose importante à noter à propos de cette macro: la variable NextTime est déclarée en dehors de la procédure réelle dans laquelle elle est utilisée. Ceci est fait pour que NextTime conserve sa valeur d’un appel de StartFlash à l’autre. C’est cette valeur qui est utilisée pour spécifier la prochaine fois (une seconde dans le futur) que StartFlash doit être réexécuté.

_Note: _

Si vous souhaitez savoir comment utiliser les macros décrites sur cette page (ou sur toute autre page des sites ExcelTips), j’ai préparé une page spéciale qui comprend des informations utiles.

lien: / excelribbon-ExcelTipsMacros [Cliquez ici pour ouvrir cette page spéciale dans un nouvel onglet de navigateur].

ExcelTips est votre source pour une formation Microsoft Excel rentable.

Cette astuce (7223) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365. Vous pouvez trouver une version de cette astuce pour l’ancienne interface de menu d’Excel ici:

lien: / excel-Flashing_Cells [Cellules clignotantes].