Personnalisation de l'interface

J

joss56

XLDnaute Accro

• 11 Octobre 2011

• #2

Re : Personnalisation de l'interface

Bonjour Jakes,

Clic droit sur l'onglet|Couleur d'onglet (en tout cas, c'est comme ça sur Excel 2007)
Bonne journée

 

Vote positif 0 Vote négatif

N

Numidia

XLDnaute Occasionnel

• 11 Octobre 2011

• #3

Re : Personnalisation de l'interface

voulez vous changer les onglets du classeur c ca ?

 

Vote positif 0 Vote négatif

N

Numidia

XLDnaute Occasionnel

• 11 Octobre 2011

• #4

Re : Personnalisation de l'interface

je veux dire les couleurs des onglets du classeur ouvert

 

Vote positif 0 Vote négatif

J

Jakes

XLDnaute Nouveau

• 11 Octobre 2011

• #5

Re : Personnalisation de l'interface

Mon dieu ça crépite ! quelle réctivité !
Merci joss56 c'est pareil sur 2010
C'était pourtant pas compliqué mais je ne l'avais pas vu.
Est-ce qu'on peut enregistrer cette couleur par défaut ?

 

Vote positif 0 Vote négatif

J

joss56

XLDnaute Accro

• 11 Octobre 2011

• #6

Re : Personnalisation de l'interface

En enregistrant ton fichier, tu conserveras les couleurs d'onglet...maintenant la couleur par défaut, je ne vois pas trop l’intérêt de colorer systématiquement ses onglets et surtout selon quels critères? En tout état de cause, je ne sais pas si cela est possible.
Cordialement

Jocelyn

 

Vote positif 0 Vote négatif

J

Jakes

XLDnaute Nouveau

• 11 Octobre 2011

• #7

Re : Personnalisation de l'interface

C'était juste pour avoir le même confort visuel qu'avec 2003 où on voyait vraiment sur quel onglet on travaillait.
Là j'ai toujours un doute. sinon aucun critère particulier, du moins d'une manière générale.
Merci pour ta réponse

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 11 Octobre 2011

• #8

Re : Personnalisation de l'interface

Bonjour Jakes , joss56, Numidia,
Si il s'agit de "démarquer" l'onglet actif des autres, on peux essayer ça (à tester sous 2010) dans le ThisWorkBook:

VB:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
For Each Sh In Worksheets
    If Sh.Name <> ActiveSheet.Name Then
        Sh.Tab.ColorIndex = 1
    Else
        Sh.Tab.ColorIndex = 3 'pas de couleur = -4142
    End If
Next Sh
End Sub

Cordialement

 

Pièces jointes

• Onglets_Couleurs.xls

  24 KB · Affichages: 47

Dernière édition: 11 Octobre 2011

Vote positif 0 Vote négatif

N

Numidia

XLDnaute Occasionnel

• 11 Octobre 2011

• #9

Re : Personnalisation de l'interface

bonjour efgé
ceci est intéressant merci pour ta reponse

 

Vote positif 0 Vote négatif

J

Jakes

XLDnaute Nouveau

• 11 Octobre 2011

• #10

Re : Personnalisation de l'interface

Merci ! je vais essayer !

 

Vote positif 0 Vote négatif

J

Jakes

XLDnaute Nouveau

• 11 Octobre 2011

• #11

Re : Personnalisation de l'interface

Ca marche sous 2010
Mais il faut reproduire l'opération à chaque classeur ?

 

Vote positif 0 Vote négatif

Efgé

XLDnaute Barbatruc

• 11 Octobre 2011

• #12

Re : Personnalisation de l'interface

Re

Mais il faut reproduire l'opération à chaque classeur ?

Cliquez pour agrandir...

Oui car le code est dans le ThisWorkBook, de plus il serait, à mon avis, dangereux de généraliser à tous classeur ouvert. Certains utilisateurs utilisent des codes couleurs dans les onglets et là on écrase tout.
Cordialement

 

Vote positif 0 Vote négatif

J

Jakes

XLDnaute Nouveau

• 11 Octobre 2011

• #13

Re : Personnalisation de l'interface

Merci

 

Vote positif 0 Vote négatif