Raccourcis clavier dans un xla

[alexis]

Bonjour

J'avais paramétré ma macro .xla avec un raccourci clavier grâce à deux méthodes, à savoir
- passer temporairement argument "isaddin" en false et paramétrer le raccourci clavier dans une boîte de dialogue Excel
- et dans le thisworkbook :
Private Sub Workbook_AddinInstall()
Application.MacroOptions Macro:="diffstatgraphiques", HasShortcutKey:=True, ShortcutKey:="T", StatusBar:="Merci d'être patient..."
End Sub

Le souci, c'est que j'ai besoin de mettre un argument optionnel dans ma macro
Sub diffstatgraphiques(Optional mode As Integer = 0).
La macro .xla fonctionne sans pb mais le raccourci clavier, lui, est devenu inopérant. J'ai tenté 1. de réutiliser la méthode "isaddin = false" 2. désinstaller la macro xla et la réinstaller. Et, bien entendu, ca ne fonctionne pas.

Auriez vous une solution pour passer une variable optionnelle dans un xla sans nuire au raccourci clavier ?

Merci!

Alexis