Rajout de la commande "Coller le valeurs" sur clic droit

Bonjour,

utilisant très souvent le "Collage spécial - Coller les valeurs",

je souhaiterai l'intégrer au clic droit d'Excel.

Ceci peu se réaliser avec le code suivant :

Sub Rajout_commandes_clic_droit()
With CommandBars("Cell")
    On Error Resume Next
    With .Controls.Add(msoControlButton, , , 4, True)
        .Style = msoButtonIconAndCaption                'Bouton avec icône + texte
        .FaceId = 1436                                  'Icône
        .Caption = "Coller les valeurs"                 'Nom du bouton
        .OnAction = "Coller_valeurs"                    'Définit la macro associée au bouton.
    End With
End With
End Sub

Sub Coller_valeurs()
    On Error Resume Next
    Selection.PasteSpecial Paste:=xlPasteValues
End Sub

Mais cela implique de devoir copier code dans chaque classeur Excel.

Alors ma question est la suivante : y'a t'il un autre moyen d'intégrer ce collage spécial dans mon clic droit,

et ce pour n'importe quel classeur ouvert.

"Coller des valeurs" est une fonction qu'on peut rajouter dans la barre de lancement rapide,

mais peut-on l'ajouter dans le menu du clic droit ??

Salut

Pas de problème, on peut rajouter l' "option"

Je vais essayer de faire simple

1. Ouverture d'un fichier excel vierge

2. Direction Développeur / VBA puis tu insert un module où tu copies ton code

Ensuite dans Microsoft Excel Object / This workbook tu places

Private Sub Workbook_Open()
    Rajout_commandes_clic_droit
End Sub

3. Retour dans excel tu enregistres ton fichier ex : rajout_collervaleur_clicdroit avec l'extension Macro Complèmentaire Excel

(C'est l'avant dernière chez moi)

4. Fermeture d'excel sans sauvegarder

5. On rouvre puis Options Excel / Compléments / Atteindre : Là tu devrait retrouver rajout...... (sinon parcourir) que tu coches

6. Fermeture / Réouverture et magie

A plus, je suis dispo si tu as des soucis.