La nouveauté de la version 2016 est la possibilité de colorer les onglets en bas de vos tableaux.
Dans la macro suivante, vous coloriez tous les onglets des tableaux d’un classeur avec la couleur ROUGE.
Sub CouleursDesOnglets () Dim feuillecalcul As Worksheet For Each feuillecalcul In _ ActiveWorkbook.Sheets feuillecalcul.Tab.ColorIndex = 3 Next feuillecalcul End Sub
En boucle, parcourez toutes les feuilles de tableau dans le classeur actif et coloriez les onglets avec la couleur ROUGE. Pour ce faire, utilisez la propriété ColorIndex pour l’objet Tab.
Si vous souhaitez supprimer toute coloration des onglets, affectez la constante xlColorIndexNone à la propriété ColorIndex.