Murali a une grande feuille de calcul qui contient une variété de formats différents. Il aimerait utiliser la mise en forme conditionnelle pour mettre en évidence les cellules contenant des dates. Cependant, il ne sait pas comment configurer correctement le format conditionnel.

Le problème est qu’Excel n’a pas de fonction de feuille de calcul qui renvoie si une cellule particulière contient une date ou non. Heureusement, VBA inclut une telle fonction, IsDate. Cela signifie que vous pouvez créer une fonction très simple définie par l’utilisateur pour renvoyer True ou False, selon qu’une cellule contient une date:

Function MyIsDate(rCell As Range)

MyIsDate = IsDate(rCell)

End Function

Vous pouvez ensuite référencer cette fonction dans une règle de mise en forme conditionnelle et ajuster la mise en forme en fonction des résultats. N’oubliez pas que cette fonction renvoie True si la cellule contient une date; il ne vérifie pas les dates précises.

Si, pour une raison quelconque, vous ne souhaitez pas utiliser de macro, vous pouvez essayer cette petite solution de contournement astucieuse: définissez une règle de mise en forme conditionnelle qui repose sur les résultats d’une formule. La formule particulière à utiliser est la suivante:

=LEFT(CELL("format",A1))="D"

La formule renvoie le code de format utilisé pour la cellule. (Dans ce cas, la cellule est A1. Modifiez-la pour refléter la cellule que vous testez réellement.)

Si le premier caractère du code de format est D, la formule renvoie True. Excel utilise divers codes de format qui commencent par D lorsque vous formatez une cellule en tant que date.

_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 (11817) s’applique à Microsoft Excel 2007, 2010, 2013, 2016, 2019 et Excel dans Office 365.