I've using the following to call a proc. to create a custom toolbar. But
I'm uncertain as to what to dim the variable vbPosition as, as I'm assigning
it the vb constant msoBarTop.

Sub Test()
Dim arrToolCaption As Variant, arrToolMacro As Variant, strDelimiter As
String, vbPosition As Variant
arrToolCaption = Array("Tool1", "Tool2", "Tool3", "Tool4")
arrToolMacro = Array("Macro1", "Macro2", "Macro3", "Macro4")
strDelimiter = " |"
vbPosition = msoBarTop
CreateToolbar arrToolCaption, arrToolMacro, strDelimiter, vbPosition
End Sub

Thanks,
Wayne C.