I have some old code I use to use that still works but instead of adding to the top menu, the new command button is added to the add-ins menu list and then burried with other items.
Public Sub test()
Set myMenuBar = CommandBars.ActiveMenuBar
Set newMenu = myMenuBar.Controls.Add(Type:=msoControlPopup, temporary:=True)
newMenu.Caption = "Blotter"
[Code]....
I have added items to my "Cell" context menu but was wondering if there is a way to move one of the items to the Filter submenu. Below is the code I am using to customize the context menuI want to move the "Filter Status" item to the filter submenu.
Sub AddToRightClick()
Dim ContextMenu As CommandBar
Dim ContextMenu2 As CommandBar
'This is for the normal view right click menu
Set ContextMenu = Application.CommandBars("cell")
[Code] .........
im having a little trouble, I cant seam to get the correct structure for adding items to the 2007 ribbon. Withen workbook activate or deactivate i am using HandleMenu = true .... or false to show and remove the added ribbon. Though when i use the HandleMenu= false to remove the ribbon it leaves the Create report item behind. What am i missing to be able to remove it correctly.
View 3 Replies View RelatedI am working on building a custom menu and I am looking for the code that would open a specific workbook execute a macro when I select the tab, can this be done????
View 1 Replies View RelatedI am trying to select something in VBA code in the Messages part of the ribbon and then Email Tags section of the outlook ribbon called Choose classification but not sure how to select this object. It is only available when you send a new email. I have been unable to paste a picture which would explain it better.
View 9 Replies View RelatedI have gone through a few programs designed to create custom UI ribbon's though I do not see an option for adding back the standard tabs. I would like to add back the text tab for instance. This is a complation of the output from a few of the ribbon creation programs.
View 3 Replies View RelatedI am working on a workbook that has a custom worksheet menu bar item created every time the file opens. If I try to edit the path of these macros and save the file, when i reopen the file, it is back to the original paths. I can't find any VB code, hidden worksheets, hidden cells,etc to find the source of this item being created. I have even deleted all VB modules and worksheets except a blank sheet and it still creates the item. Somewhere this menu bar item is being created and I have no idea where. It acts the same on 4 different machines and acts the same on Excel 97, 2000, 2003 and 2007.
View 4 Replies View RelatedI am wondering if there is any code to SELECT (DESELECT) A MENU ITEM using VBA? I have an Excel Add-in program installed, which adds a Menu "Easycal" to my Excel menu bar. Under "Easycal" (drop down list), I have the following items:
Refresh workbook
Refresh worksheet
Turnoff Easycal
I am using "Easycal"'s functions in various cells of my sheet "Final". When I select "Refresh worksheet" from "Final", "Easycal" fetches (or calculates) me the data from the "Easycal" database. I have a macro (on "Final") that pulls together data from other sheets of the same workbook. I there anyway to include a code in my existing macro, so that when I run the macro, the following are completed in sequence:
1. Select "Turnoff Easycal" menu item
2. Run my existing macro (to pull the data from other sheets to "Final")
3. DeSelect "Turnoff Easycal" menu item
4. Select "Refresh worksheet" menu item
Is it possible to disable or grey out the windows options in the Tools>options tab?
Trying to write a VBA code to add a new menu item with submenus on the Standard toolbar when Workbook_Open and then deleting it (_Before close). Just having trouble with the creating of the menu item. Here is what I have so far:
Sub Workbook_Open()
...
Dim menuitem As CommandBarPopup
Set Menu = Application.CommandBars("Menu Item").Controls.Add (Type:=msoControlPopup, Before:=13)
...
End Sub
I want to add autosum to the right mouse button. I found a link on another thread in this forum to [url]
but I'm not sure what to do with it.
Where and how do I add the code?
Here is my current formula:
=IF(ISERROR(INDEX(Sheet3!$D$5:$D$200,MATCH(E5,IF(Sheet3!$C$5:$C$200=C5,Sheet3!$A$5:$A$200),0))),"0",INDEX(Sheet3!$D$5:$D$200,MATCH(E5,IF(Sheet3!$C$5:$C$200=C5,Sheet3!$A$5:$A$200),0)))
I would like to add one more item to match. I need to match column H in my current sheet, to that of column E in sheet 3. Just not sure how to go about it.
I created a Validation list from 2 to 20. I want to have it (the list) add a row every time you select the proper data.
Example: If I want to add 2 row I would select the 2 in the drop down menu. If I need 5 rows I need to select 5 from the drop down menu.
Is this a VBA code? Or can I use a formula?
I have a suite of subroutines and functions stored in an .xla file, which other users have access to. It's installed on the local machine via macro which installs a user defined menu to access them from. Howerver, when an XL chart worksheet is active, this menu doesn't appear and there are a couple of functions where it would be useful to have access to when viewing such a chart. I've noticed user defined toolbar icons are available in this view, so would like to use these to access the relevant routines. I know you can insert them in code (macro recorder) but is it possible to assign macros to them from the same code? Alternatively, is it possible to show my user defined menu in chart sheets as well as normal worksheets?
View 9 Replies View RelatedI have created a menu called "Temp" and a sub menu called "Temp1". When the user click on Temp1, I need to dynamically add some menu items under Temp1. Is this possible in Excel?
I need to do this on the right click menu. for example, along with "Cut", paste" etc menu's I need to add a Menu Item, Temp and under this menu, I need to add a SubMenu, Temp1. When the user click on the Temp1, I need to populate the child items.
I have an excel column that includes many numbers. I want to add them to the listbox. But there are same numbers in the list. What I want to do is to add each number to the listbox only once. Example:
This is what I have__________________This is what I want
622768____________________________622768
622768____________________________631215
622768____________________________635054
631215____________________________647461
631215____________________________681216
635054
[Code]....
I want to add Paste Values to the right click menu in Excel 2007. Can this be done without recording a separate macro to run it? What I mean is If I add the command itself to the right click menu, can it run of of the standard RightClick -> Paste Special -> Values option, or must I record a macro that does those steps each time?
View 7 Replies View RelatedI have written some code that customises my Right-Click Menu. This works perfectly well but doesn't create the FaceIDs.Can anyone explain why? The Code is as follows
Sub CustomiseRightClickMenu()
Dim cbnRightClickMenu As CommandBarButton
Dim rngMacroNames As Range
Dim intLoopCounter As Integer
'DEFINE THE RANGE CONTAINING ALL THE MACRO NAMES
Set rngMacroNames = Sheet1.Range("MacroNames")
'DEFINE ARRAY OF FaceIDs
arrFaceIDs = Array(255, 590, 350, 536, 576, 410, 401)
On Error Resume Next
With Application
For Each Cell In rngMacroNames
. CommandBars("Cell").Controls(Cell.Formula).Delete ..............
I have a named range on a hidden sheet which populates data validation lists on 'sheet 1, cells b5-b55. My question is this...Is it possible to, upon entering a new item in b5 (for example), to have that item automatically added to the named range? (preferably through a button on a pop up form that opens w/ the question 'would you like to add to the list?, similar to an access form)...I've seen one example in the past which I found with a link from this site, but couldn't make it work. If the answer to my question is yes, could you also suggest a location of an example if you know of one?
View 14 Replies View RelatedI wonder if it is possible to make a macro that right clicks a cell and then chooses a option from the list?
View 11 Replies View RelatedI'm trying to automatically add and remove one criterion from an autofilter without disturbing the previous existing criteria The autofilter code sounds like this:
Code:
ActiveSheet.Range("$A$1:$L$47").AutoFilter Field:=6, Criteria1:=Array( _
"Clay", "Grass"), Operator:=xlFilterValues
How would I go about referring to this array and adding another item called "Hard" to any pre-existing elements in this array?
I plan on attaching this code to a button and use it as a filter, so when the button is pressed, the item will be added to the list of criteria, and if it is "un-pressed" the item will be removed.
I have created a sub to add new controls to the "Cell" shortcut menu. Can I remove the standard "Cell" shortcut menu controls? if so how do you do it?
[Code] ......
I have a workbook with multiple sheets. Is there a tool that creates a menu bar or code that I can add that would support navigation?
My goal is to have something with approximately 4 options (buttons?). They would link to 4 different sheets that serve as indexes within the workbook.
I know I can add a control like a button to a given sheet that would take the user to given sheet when clicked, but can I make the button 'float' above all the sheets, or add to a menu bar, or something? I just don't want to have to add the button to every sheet in the workbook.
I am looking for something simple/easy, and am not looking for anybody to do the work. I just have no idea on how to approach the problem.
Excel Userform
VB:
'enables user to click [U]highlight and select[/U] an item in ListBox1 and ListBox2 item (same row in index) is also [U]highlighted[/U] (highlighted only not selected)
Private Sub ListBox1_Click()
ListBox2.ListIndex = ListBox1.ListIndex
End Sub
Question: Is it also possible to enable a user to click to select an item in ListBox1 and ListBox2 item is also selected simultaneously (same row in index). Is there excel vb code to do this?
I think the code may be along the lines of the ListBox SelectedIndex property. What would be the Excel VB code equivilant for the ListBox SelectedIndex property, if so?
I have a column with various drop down menu boxes and I need to add another selection to the menu list. My problem is, it's been so long since I did the drop downs, I have forgotten how to do it..
View 3 Replies View RelatedI'm adding a menu selection to the right-click menu that you get for cells. I can add and remove the menu option but, when I try to execute the macro tied to the menu, I get "the macro...cannot be found". I can't figure out what appears to be a "pathing problem". I'm sure it's simple but...
Here's the
I have actually got the Window menu in the Main Menu Bar of excel deleted using below command.
Application.CommandBars("Worksheet Menu Bar").Controls("Window").Delete
Now this is something which I dont even know if it can be done, but its something which I would use, a lot. When clicking on a button, like a normal button from the control toolbox, is it possible to open a menu from this? So I click on the button i made called "accounts" and this opens a menu next to it with different options.
View 5 Replies View Relatedmy worksheet menu bar is displaying the ' Chart' menu no matter what I do. Not only do I have no charts in the workbook, (verified this by: )
For Each ws In Worksheets
ws.Select
MsgBox ActiveSheet.ChartObjects.Count
Next ws
but adding worksheets, selecting various parts of a worksheet, creating a chart and deleting it, and everything else I've tried has no effect.
One interesting thing - the first chart I added (to test if it would 'unstick' itself upon deletion of the new chart) was named 'Chart 2', implying there was a chart1 that existed previously.... although I am fairly certain I never added a chart to this workbook at any point.
Also, the menu bar is working fine in other workbooks, and changes to chart and back to data like normal.
numberdesc
1_______yellow
1_______yellow
1_______blue
2_______purple
2_______purple
3_______green
3_______orange
4_______black
I need some way that can identify when the item in the description column doesnt match the first item of the same number- for example, here the 1-blue and 3-orange would be flagged because they should match the 1-yellow and 3-green.
I need to do this on a much larger scale (approximately 20,000 data points), so I wanted to create a formula or macro that could do this for me.. I thought making a reference page with would work but I keep getting an error.. I haven't done VBA in a while, so I may have syntax errors.
If Range("A2:A9").Sheets("Sheet1") = Range("A2:A6").Sheets("Ref") And Range("B2:B9").Sheets("Sheet1") = Range("B2:B6").Sheets("Ref") Then
Range("C2:C9").Sheets("Sheet1") = "x"
End If