XL 2016 Liste des mots-clés utilisés par Excel dans l'Undo Stack

[Dudu2]

Bonjour,
Quelqu'un aurait-il un moyen de trouver dans Excel VBA les références des mots-clés utilisés par Excel dans sa pile des Undo, mots qu'on peut afficher avec par exemple:

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
    Dim UndoName As String
  
    UndoName = Application.CommandBars("Standard").FindControl(ID:=128).Caption
    MsgBox Application.CommandBars("Standard").Controls(UndoName).List(1)
End Sub

etc...

Ces mots sont en "Local language" et c'est la raison pour laquelle j'aimerais plutôt les trouver par une référence codée.

Merci par avance.

 

[Dudu2]

Bonjour Dranreb,
Oui j'ai mal interprété et je m'en excuse.
JP

 

[Staple1600]

Bonsoir le fil

Dudu2
• Petite précision
QAT = Quick Access ToolBar
ou barre d'outils Accès rapide
(voir ma copie d'écran du message#25)
C''est simple d'emploi et ne nécessite pas de VBA
C'était simplement une suggestion de ma part.
Et qui permet de faire simplement (un clic sur un bouton) ce que tu demandes:
Collage Valeurs seules

 

[Dudu2]

Bonsoir Staple1600,
Oui c'est une bonne idée, merci pour cette suggestion.
JP