Ouvrir Userform par menu contextuel clic droit

Bonjour,

Après création d'un bouton dans le menu contextuel clic droit, je sais lancer l'exécution d'une macro.
Maintenant, je voudrais savoir s'il est possible d'ouvrir un(e?) Userform ?
J'ai essayé plusieurs possibilités, mais sans succès:

Dim BtnC As CommandBarButton
On Error Resume Next
Set BtnC = Application.CommandBars("Cell").Controls("EnregistrementHoraires")
On Error GoTo 0
If BtnC Is Nothing Then
With Application.CommandBars("Cell").Controls.Add(msoControlButton, , , , True)
.Caption = "EnregistrementHoraires"
.BeginGroup = True
.FaceId = 4 ' n° de l'icone
.Style = msoButtonIconAndCaption
----------------
.OnAction = "EnregistrementHoraires.show"
----------------
End With
End If

Avec votre aide, merci.