Разделительные полосы между кнопками на toolbar

Спасибо f14tc!

Что-то у меня ничего не получается
--------------------------------------------------
Set toolbar_button = Toolbar1.Buttons.Add(11, , , tbrDefault, "Underline")
toolbar_button.ToolTipText = "Underline"

'Set toolbar_button = Toolbar1.Buttons.Add(12, , , tbrSeparator, "Left") это создает просто пространство между кнопками
Me.Toolbar1.Buttons(12).Style = tbrSeparator ' а это вызывает ошибку index out of bounds

Set toolbar_button = Toolbar1.Buttons.Add(13, , , tbrDefault, "Left")
toolbar_button.ToolTipText = "Left"
--------------------------------------------------
Может я не правильно понял, что нужно делать с Me.Toolbar1.Buttons(2).Style = tbrSeparator?

А если так?

Toolbar1.Style = tbrFlat
Toolbar1.Buttons.Add , "Left", "Left", tbrDefault
Toolbar1.Buttons.Add , "", "", tbrSeparator
Toolbar1.Buttons.Add , "Right", "Right", tbrDefault
Toolbar1.Buttons("Left").ToolTipText = "Left"
Toolbar1.Buttons("Right").ToolTipText = "Right"

Благодарю f14tc!
Теперь все ОК