C
christian
Guest
bonjour à tous,
Je voudrais aligner les 2 barres d'outils ci-dessous l'une à côté de l'autre et non pas l'une en dessous de l'autre. Est-ce qu'il existe une solution ?
Sub BarresEnHaut()
Dim MaBarre As CommandBar
Set MaBarre = CommandBars.Add("barre perso")
With MaBarre
.Visible = True
.Position = msoBarTop
End With
Set MaBarre1 = CommandBars.Add("barre perso1")
With MaBarre1
.Visible = True
.Position = msoBarTop
End With
End Sub
Je voudrais aligner les 2 barres d'outils ci-dessous l'une à côté de l'autre et non pas l'une en dessous de l'autre. Est-ce qu'il existe une solution ?
Sub BarresEnHaut()
Dim MaBarre As CommandBar
Set MaBarre = CommandBars.Add("barre perso")
With MaBarre
.Visible = True
.Position = msoBarTop
End With
Set MaBarre1 = CommandBars.Add("barre perso1")
With MaBarre1
.Visible = True
.Position = msoBarTop
End With
End Sub