Automatiser les couleurs d'onglet

Alain Werth · 25 Septembre 2005

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 · 25 Septembre 2005

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

Automatiser les couleurs d'onglet

Alain Werth

Guest

CBernardT

XLDnaute Barbatruc

Discussions similaires