Comment imposer à une barre d'outils perso un emplacement précis dans une fenêtre ?

With Application.CommandBars("toto")
  .Position = msoBarRight
  .Visible = True
 End With
 end sub

Les constantes possibles pour la position de la barre d'outils msoBarLeft, msoBarTop, msoBarRight, msoBarBottom