Did you know that in Word97SR2 you can create toolbars with identical names?

<pre>Public Function boolCreateToolbar(strToolbar As String) As Boolean
' Procedure : boolCreateToolbar
' Description: Create a toolbar.
' Copyright: Chris Greaves Inc.
' Inputs: STRING name of toolbar
' Returns: None.
' Assumes: None.
' Side Effects: None
' Tested: By the calls below.

CommandBars.Add(Name:=strToolbar).Visible = True
'Sub TESTboolCreateToolbar()
'MsgBox boolCreateToolbar("b")
'MsgBox boolCreateToolbar("b")
'End Sub
End Function