from the help example for the Builtin property of a commandbar:

foundFlag = False
deletedBars = 0
For Each bar In CommandBars
If (bar.BuiltIn = False) And (bar.Visible = False) Then
bar.Delete
foundFlag = True
deletedBars = deletedBars + 1
End If
Next
If Not foundFlag Then
MsgBox "No command bars have been deleted."
Else
MsgBox deletedBars & " custom command bar(s) deleted."
End If
I can't say about the ability to inventory attached bars. I am not familiar
with any thing that would support that.
--
Regards,
Tom Ogilvy

"KL" <lapink2000(at)hotmail.com wrote in message
...
Hi there,

Soppose I have bunch of files wich have quite a few different custom
commandbars (some are generated by code and some manually attached to the
file). The commandbar names may vary from file to file so it is difficult
to
predict them. Is there a way to bulk-delete all CUSTOM commandbars without
having to specify their names?

Something like this:
For each cb in Application.CommandBars.CustomBars
cb.Delete
next cb

Also, is it possible in VBA to tell wheather a custom bar is attached to a
file?

Thanks,
KL