Automatiser les couleurs d'onglet

A

Alain Werth

Guest
Hello,
je n'arrive pas à personnaliser la couleur de la ligne basse dite de défilement (toujours blanche) et se confond donc facilement avec les couleurs d'onglet (blancs par défaut).
Existe t-il une solution afin d'avoir toujours des couleurs d'onglet différentes du blanc ? ou bien une couleur de la barre de défilement horizontal différent du blanc ?
 

CBernardT

XLDnaute Barbatruc
Bonsoir Werth,

Une macro à placer dans le module ThisWorkbook :

Private Sub Workbook_Open()
Dim i As Integer, y As Byte
y = 3
For i = 1 To Sheets.Count
If y = 56 Then y = 3
Sheets(i).Tab.ColorIndex = y
y = y + 1
Next i
End Sub

A chaque ouverture du classeur, la macro mettra en couleur tous les onglets présents dans le classeur.

Cordialement

Bernard
 

Statistiques des forums

Discussions
311 726
Messages
2 081 955
Membres
101 852
dernier inscrit
dthi16088