Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Command Bar Menu - Management
I am not a programmer, but somehow I got assigned this task for knowin enough about excel functions. I am having an issue, where I have a general custom menu called Report where I have a few macros running reports for a few people. However different people within that group have individual reports, as well a individuals that do not have the general reports may have an individua one. The problem I am running into, while trying to be consistent across th board, is that all the reports (individual or general) are trying to us the same menu name: "Reports" so if an individual has multiple report from seperate macros they end up with 2-3 different menu choices whe all three macros are opened. I need a way to say I reportmenudoesnotexist Then create reportmenu End If -- kralj ----------------------------------------------------------------------- kraljb's Profile: http://www.excelforum.com/member.php...nfo&userid=995 View this thread: http://www.excelforum.com/showthread.php?threadid=27246 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Command Bar Menu - Management
This will insert the Reports Menu just in front of Help, if it doesn't
already exist: Dim ctlReports As CommandBarControl With CommandBars(1) On Error Resume Next Set ctlReports = .Controls("Reports") On Error GoTo 0 If ctlReports Is Nothing Then Set ctlReports = .Controls.Add( _ Type:=msoControlPopup, _ Befo=.FindControl(Id:=30010).Index, _ Temporary:=True) ctlReports.Caption = "Reports" End If End With In article , kraljb wrote: I am not a programmer, but somehow I got assigned this task for knowing enough about excel functions. I am having an issue, where I have a general custom menu called Reports where I have a few macros running reports for a few people. However, different people within that group have individual reports, as well as individuals that do not have the general reports may have an individual one. The problem I am running into, while trying to be consistent across the board, is that all the reports (individual or general) are trying to use the same menu name: "Reports" so if an individual has multiple reports from seperate macros they end up with 2-3 different menu choices when all three macros are opened. I need a way to say If reportmenudoesnotexist Then create reportmenu End If. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Command Bar Menu - Management
Generally, it would be something like
On Error Resume Next Set oCB = Application.CommandBars("myReports") On Error GoTo 0 If oCB Is Nothing Then 'CreateIt End If but show us the code if this doesn't solve it -- HTH RP "kraljb" wrote in message ... I am not a programmer, but somehow I got assigned this task for knowing enough about excel functions. I am having an issue, where I have a general custom menu called Reports where I have a few macros running reports for a few people. However, different people within that group have individual reports, as well as individuals that do not have the general reports may have an individual one. The problem I am running into, while trying to be consistent across the board, is that all the reports (individual or general) are trying to use the same menu name: "Reports" so if an individual has multiple reports from seperate macros they end up with 2-3 different menu choices when all three macros are opened. I need a way to say If reportmenudoesnotexist Then create reportmenu End If. -- kraljb ------------------------------------------------------------------------ kraljb's Profile: http://www.excelforum.com/member.php...fo&userid=9955 View this thread: http://www.excelforum.com/showthread...hreadid=272466 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Macros and Menu Command | Excel Discussion (Misc queries) | |||
How disable menu command | Excel Discussion (Misc queries) | |||
Name command in Insert Menu | Excel Discussion (Misc queries) | |||
there is no XML command on my data menu | Excel Worksheet Functions | |||
Execute a menu command with VBA? | Excel Programming |