I'm trying to add a menu to the top menu bar in CES, where I can put my local automation programs.
For example in DxDesigner I use this code.
Set menu = CommandBars("Sheet Menu Bar").Controls.Add(cmdControlPopup,,,-1)
' Menu text
menu.Caption = "&LXK"
' Add a menu item to the menu
Set button = menu.Controls.Add
' Menu item text
button.Caption = "View Data Sheet for Selected Part"
' Action to perform when the menu item is selected.
button.OnAction = "run /tools/lexmark/pcb/scripts/DxDesigner/ViewDataSheet.vbs"
' Menu item is "grayed" out and cannot be activated; Set to True
' to enable the menu item's selection.
button.Enabled = True
I'm trying to something similar in CES, but I don't know the name of the CommandBars to use; for the top menu bar - File Edit View Setup Filters Tools Data Output Help
Is there a way I can find the name?
Lexmark International Inc