Pour @Thierry

[pat5]

Bonsoir

Je sais que ça ne te plait pas qu'on t'écrive directement dans le forum, mais je suis retombé sur ton fichier " MenuContextuel " ( celui où le bouton des couleurs de fond se met justement dans le menu contextuel du bouton droit). Je n'arrive pas à le mettre par défaut dans Excel.
Est-ce possible, s'il te plait ???

Je pense que beaucoup de monde serait intérésser au lieu de monter dans la barre des menus

Merçi A+ Salut ;o)

 

[@+Thierry]

Salut Pat5 Bonsoir le Forum

Pas de problème pour un post comme celui-ci que je qualifierais "d'utilité publique" (lol)

Par contre là je pars du bureau, et je vais faire deux course... Je reprends ce fil tout à l'heure...

à de suite...

@+Thierry

 

[@+Thierry]

Salut Pat

je t'avais un peu Zappé avec ma nouvelle démo qui m'a pris plus de temp que prévu ce soir...

Ben c'est simple, ici les codes du private Module ThisWorkBook contiennent ça :

Option Explicit
Private Sub Workbook_Open()
Mettre
End Sub
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Enlever
End Sub

Dans un module Standard il y a ça :

Option Explicit

Sub Mettre()
Dim Ctrl As Object
For Each Ctrl In Application.CommandBars("Cell").Controls
If Ctrl.ID = 1691 Then Exit Sub
Next Ctrl
Application.CommandBars("Cell").Controls.Add _
Type:=msoControlSplitButtonPopup, ID:=1691, Before:=1
End Sub

Sub Enlever()
Dim Ctrl As Object
For Each Ctrl In Application.CommandBars("Cell").Controls
If Ctrl.ID = 1691 Then Ctrl.Delete
Next Ctrl
End Sub


Si tu veux conserver cette barre de couleur en permanence, tu empêches simplement la macro "Enlever" d'agir (elle agit donc toute seule en Macro évènementielle "Workbook_BeforeClose") (mais garde le fichier sous le bras !)

Bonne Nuit
@+Thierry

 

[pat5]

Re-Bonjour @Thierry

Je me suis d'abord jeté sur ton invitation et je viens d'arriver sur cette réponse simple ( j'y avais pensé mais je n'ai pas osé ).
Encore une fois merçi et si Bilou me demande comment améliorer Excel, je lui donnerais ton adresse Ha,Ha,Ha,

Allez à tout à l'heure pour une autre démo magnifique

A+ ;o)