Sélection des cellules non vides

La macro ci-dessous m’a été demandée par un lecteur qui souhaitait sélectionner, à l’intérieur d’un bloc, toutes les cellules non vides, donc contenant du texte, une valeur ou une formule. Le but qu’il poursuivait était de donner à cette sélection un format et/ou un motif particulier.

Cette macro n’est pas bien compliquée. Il faut toutefois ne pas oublier le On Error... au début car, quand un ensemble de cellules sélectionnées via le SpecialCells est vide, cela engendre une erreur.

Notez aussi l’utilisation de la commande Union, bien utile dans les macros, tout comme sa copine la commande Intersect.

Remarque – A la place du test If Formules.Cells.Count > 0, nous aurions pu utiliser un test tel que : If Not Formules Is Nothing.