Boucle sur les CommandBarButton d'un objet CommandBars ?

Bonjour le Forum,
Quelqu'un connaîtrait-il la syntaxe de "pour chaque bouton qui compose ma barre d'outil perso"…
J'ai essayé :
Set maBarre = Application.CommandBars(user)
For Each CommandBarButton In maBarre ou encore For Each Control In maBarre : ça plante toujours
Le but du jeu est d'obtenir au final le numéro d'identification Excel de chaque bouton de ma barre perso, avec une commande du style :
MsgBox CommandBarButton.FaceId


Merci d'avance pour vos réponses !