[AccessD] more questions on command bars

Susan,

I will guess that you created new CommandBarControls
without setting the .Caption property. Try hovering your
mouse over the ActiveMenuBar and you may see that
the Custom Popup #### is there.

If you had set Temporary to true then just closing the
database will remove them. Otherwise, right click on
the ActiveMenuBar, click Customize and then right-
click on the captionless buttons and click Delete.

Michael R. Mattys
www.mattysconsulting.com

----- Original Message -----
From: "Susan Harkins" <harkins at iglou.com>
To: <AccessD at databaseadvisors.com>
Sent: Saturday, April 05, 2003 9:03 PM
Subject: [AccessD] more questions on command bars


> The following function lists the commands on the active menu bar -- my
> question is about the visible/invisible commands? If you remove the If
that
> checks for the Visible property you get a huge list of commands, some I
> don't even recognize. What are these invisible commands?
>
> Susan H.
>
>
> Function NameMenuCommands()
> Dim menubar As CommandBar
> Dim menucommand As CommandBarPopup
> 'Dim menucommand As CommandBar
> Set menubar = CommandBars.ActiveMenuBar
> For Each menucommand In menubar.Controls
>   If menucommand.Visible = True Then
>     Debug.Print menucommand.CommandBar.Name
>   End If
> Next
> End Function
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com