Replacing The Cell Right Click Menu
Dec 30, 2009
Right click menus are a well known topic but I am struggling to find information on what I want to do with them. I have seen it done so I know its possible. What I want to do is completely replace the right click menu with my own custom one on a worksheet.
I do NOT want to add things to the existing right click menu I want to effectivly disable the existing one and put on my very own one in its place. I have looked at the code for adding a menu to a textbox etc which seems sound but I can't trigger it with an event. I don't have any code to show Im afraid as I am just playing with other people at the moment trying to get it to work.
View 9 Replies
ADVERTISEMENT
Feb 7, 2014
I 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 Related
Sep 14, 2007
Need code to allow the sheets in a workbook to be selected from the right click menu
View 11 Replies
View Related
Jul 29, 2009
I want to be able to give my application menu when the user right-clicks on a specific series of cells. I've already got the code that will limit the right-click options to the cells that I want.
How do I then form and execute the menu that I want the user to see - "Archive Data", "Edit Data", "Add Data", for instance, rather than the normal right-click menu?
View 2 Replies
View Related
Mar 21, 2007
I have been modifying the options available on my right click menu, getting rid of about half of what was there and adding items I use quite often like Paste Values, Paste Formats, Paste Formulas, Sort..., AutoSum, and Format as Percent, as well as adding group dividers. I have it just the way I want it, but I have one issue. If the clipboard is empty, all of the paste buttons are disabled on the Standard toolbar and in the Edit menu as are the Paste and Paste Special... items on the right click menu, but the new paste items I added to my right click menu are still enabled. If I click on one, I get a "PasteSpecial method of Range class failed" error because I have no range selected. I got around this by adding On Error Resume Next to the macros of my added paste functions - not elegant, but functional. Is there a way to have those items appear grayed out and disabled on my right click menu when the clipboard is empty as opposed to my current workaround?
View 9 Replies
View Related
Aug 26, 2007
Question regarding the disabling of right mouse button click options and have used the code below to disable and reciprocal code to enable options. The code works well in Excel 2003 but have recently used the spreadsheet in excel 2000 and the code causes a runtime error 5 'Invalid procedure call or argument'. how to amend the code to have it also work with Excel 2000.
With Application. CommandBars(" Cell")
.Controls("Cut").Visible = False
.Controls("Paste Special...").Visible = False
.Controls("Insert...").Visible = False
.Controls("Delete...").Visible = False
.Controls("Clear Contents").Visible = False
.Controls("Insert Comment").Visible = False
.Controls("Format Cells...").Visible = False
.Controls("Pick from drop-down list...").Visible = False
.Controls("Format Cells...").Visible = False
.Controls("Add Watch").Visible = False
.Controls("Create List...").Visible = False
.Controls("Hyperlink...").Visible = False
.Controls("Look up...").Visible = False
End With
View 3 Replies
View Related
Jan 18, 2008
I have acquired code to add an item to the right-click menu.
I have added my item using "before:=1", which works fine by putting the item at the top of the list of items in the menu.
My problem is that I require to add the same item ( obviously with a different name ) that needs to be at the bottom of the list.
The reason being, that the pop-up can either display downwards or upwards and I want the user to be in closest proximity of the item.
if it possible ) to add an item to the bottom of the list.
The line I need to change is:
CommandBars("Cell").Controls.Add(Type:=msoControlPopup, before:=1).Caption = "MyMacros2"
View 3 Replies
View Related
Dec 10, 2009
I created a right-click menu for userform textboxes from a code I found through googling. It works perfect, however, I don't know how to get it to work for more than one textbox.
Here's the code for the userform:
View 10 Replies
View Related
Dec 26, 2010
I made custom menu with these instructions: [URL]....
Problem is that when I right click my makro keeps copying itself. Ten times right click=ten my macro in the right click menu. It means that
Private Sub Workbook_Deactivate() doesn't work as it should be?
View 2 Replies
View Related
Jul 11, 2014
Is it possible to create a menu that could be called by a double click which would allow you to click on a value from that menu and insert it into the double clicked cell. I know I could use a data validation list, but that is tacky and you have to scroll down the list to find the data you would like. I'd like to have a menu pop up that stores different values in 6 columns and 25 rows. Any way without having to jump into an access database?
View 2 Replies
View Related
Apr 15, 2007
I must have disabled right click on the forms button. I usually associate a macro with the button but the menu disapeared. How can I get it back.
View 9 Replies
View Related
May 5, 2007
I've run into this really strange problem with my right click menu (popup command bar) The UF that handles the cb is loaded at workook open event and it's modal*
When first right click, the commandbar is invisible, but it's there. Only shadow seems, and when click on arrow, starts showing menu. I could say that something like repaint needed. If i click on anything, next time it popups normally !!
The problem does not occur if:
1) i load the uf manually
2)* display the UF modeless
View 2 Replies
View Related
Aug 9, 2009
I have few questions,
1. why the "auto sum" icon grey out, and doesn't work.
2. when I right click the sheet, the menu doesn't show up.
3. Insert columns/rows, When I highlight 2 columns/rows, right-click the mouse & the menu doesn't show up for me to choose insert col/row.
View 9 Replies
View Related
Feb 12, 2007
I have a list box with items. When I stay on item and press mouse right click, I want see pop up menu with "remove this item" and "add new item".
View 8 Replies
View Related
Dec 17, 2007
I used the commandBar to create a right-click menu on a userForm but unfortunately I get an error 400 every time I click on the option "Edit" and I don't understand what I did wrong.
Sub CreateCmdBar()
Dim st As CommandBar
'delete the pop-up if it exists
On Error Resume Next
Application.CommandBars("flexgrid_rc").Delete
'Disables enabled error handler in the current procedure and resets it to Nothing. On Error GoTo 0
On Error Goto 0
Set st = CommandBars.Add( Name:="flexgrid_rc", Position:=msoBarPopup, Temporary:=False)
'add two menu items to the new commandbar
With st..................
View 3 Replies
View Related
Dec 30, 2008
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 Related
Sep 5, 2009
I'm using Excel 2003 and am unable to find the name of, and therefore customise, the right-click shortcut menu that pops up when you right-click on a line drawn from the 'Drawing" toolbar. Basically, I'm trying to do some technical analysis on a chart. I want to be able to right-click on the lines that I draw on the chart and replicate a parallel line.
View 3 Replies
View Related
Jan 17, 2007
I 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 ..............
View 2 Replies
View Related
Jun 13, 2007
I'm working on a sheet which uses a fair amount of indirects, deleting or adding rows bugger these up, so I wanted to replace them with a macro which does if for them and keeps the structure intact. I've sorted the macro to do this and have sorted the macro to replace delete with my delete in the cell RC menu but the row RC menu only seems to work on around 50% of the PC's? All PC's are XP with XL 2003. The code I've used is detailed below. Is this a known issue with XL or something funky with some of the PC's?
With Application
. CommandBars("Row").Controls("Delete Row").Delete
Application.CommandBars("Row").FindControl(ID:=293).Delete
Set cBut2 = .CommandBars("Row").Controls.Add(Temporary:=True, Before:=6)
End With
With cBut2
.Caption = "Delete Row"
.Style = msoButtonCaption
.OnAction = "Delete_Row"
End With
View 2 Replies
View Related
Jul 11, 2007
I cannot figure out why this setting has changed. When I right click my tab worksheet in Excel to copy or rename, it does not allow me. I will need your advice to re-activate that options so it is visible and not gray. I tried in the VBA workbook properties settings with no luck and also Tools, Options.
View 6 Replies
View Related
Apr 17, 2008
I am developing a program for my electrical calculations (electrical panel). In the program, on my worksheet, I need all row inserts/deletes being watched and logged into another worksheet. I have become to a conclusion it would be best done by "taking over" default behaviour of built-in right-click menu commands like "Copy", "Paste" and "Delete".
In the ozgrid tips page I found some solutions how to deactivate those commands, but that is not what is best for me - when the menu item (or a corresponding key) is pressed, I would like to check if the ActiveCell (or ActiveRow) meats some criteria, and acording to that, make some changes in my "log" - and after - let further actions to default command behaviour. I think of it like "BeforeDelete", "BeforeInsert" or something. In fact the "log" is the worksheet with coordinates of my tables from the first worksheet, which should be changed according to new size of a table after the row insert or delete.
View 3 Replies
View Related
Jun 26, 2014
In Excel 2010 onwards (probably 2007 as well) there are two right click context menus that pop up on a cells.
The "Cell" command bar and also a smaller formatting bar.
What is this bar called and if you remove it how do you get it back when you have removed all the standard bars.
VB:
Application.Commandbars("Cell").Reset
The above doesn't seem to get back the formatting bar. I did managed to get it back but through luck rather than judgement. Just through looping through every commadbar and printing it to the immediate window.
I've added the name of the context menu to each commadbar but the formatting one does not get a name put at the bottom of it. I've looked on this site and it doesn't seem to say anything about this new menu.
View 1 Replies
View Related
Sep 28, 2007
I have customised the right click menu's for this spreadsheet and currently it is all hard coded. I was wondering if it is possible to dynamically modify the right click menu? The code currently has right click buttons for each staff member, and when clicked other actions are performed. I have added a "Staff" sheet and was wondering if there is a way the code can reference that sheet and create the list based on those entries for example, when new staff join or other staff leave?
I'm sure that there is a better way to go about this, perhaps a For... Next loop but I don't know enough about it. In the mean time, I will keep bashing away at it in hopes of a brainwave... it's a Friday before a long weekend and I think my brain has decided its holiday time.
Option Explicit
Private Sub Workbook_Deactivate()
On Error Resume Next
With Application
. CommandBars("Cell").Controls("Add Nick").Delete
.CommandBars("Cell").Controls("Add Toby").Delete
.CommandBars("Cell").Controls("Add Ben").Delete
.CommandBars("Cell").Controls("Add Matt").Delete
.CommandBars("Cell").Controls("Add Zoe").Delete
.CommandBars("Cell").Controls("Add Anne").Delete
.CommandBars("Cell").Controls("Add Craig").Delete
.CommandBars("Cell").Controls("Add Unknown (1)").Delete
.CommandBars("Cell").Controls("Add Unknown (2)").Delete
.CommandBars("Cell").Controls("Remove").Delete
End With
With Application
.CommandBars("Cell").Controls("Cut").Visible = True
.CommandBars("Cell").Controls("Copy").Visible = True...............................
View 2 Replies
View Related
Jun 12, 2009
I want to be able to replace the bolded and underlined areas of this javascript i have pasted in a cell with the value located in another cell. This means that those numbers would be replaced by a similar thing located in another cell. how can this be done? The way I would think you would do this by defining that say =b8 (an example of where the data could be coming from is ann excel formula, but not sure how to do this ...
View 6 Replies
View Related
Jun 4, 2014
Have a column of cells (521 rows), on the column each cell contains a group of number
Example:
27, 539, 484, 485, 506, 594, 523, 502, 505, 525, 541, 526, 527, 529, 542, 533
28, 540, 493, 494, 506, 594, 523, 502, 509, 525, 541, 526, 527, 529, 542, 530
28, 540, 493, 494, 506, 594, 523, 502, 509, 525, 541, 526, 527, 529, 542, 533
Let's say I would like replace 27 to 163 but when I find and replay the "527" also changed to 5163. How can i filtered out 527 and just change the 27. I tried Match Entire Cell Content, it doesn't work.
View 14 Replies
View Related
Jun 6, 2014
I created a custom ribbon with tickmark button. The problem is that at sometimes, i will need 2 tickmarks in the same cell.
Actually in using the simple line :
ActiveCell.Value = "a"
And when i click on a second tickmark, it replace my "a" by ei. "b"...how to make it "ab" instead ?
View 1 Replies
View Related
Sep 8, 2008
OS=XP Pro
XL=2003 SP3
I need to move data within a cell. Is there a formula that can accomplish this? Here is an example of what I'm trying to do..
Column A
/ TN14YP244f
/ TN15YP245j
/ TN16YP246h
What it would need to do is take the last character in each cell and move it to replace the P in that cell. It should also capitalize the letter. ie: / TN14YP244f would become / TN14YF244
The letters at the end of the cell are always different, however the letter they replace is always the same (P).
View 9 Replies
View Related
Apr 17, 2009
I have a long spreadsheet that is formatted and organized with six digit codes on the left, and then several lines of information on the right, in order to sort and compare to another report, I was trying to replace the blanks in the digits on the left....
View 7 Replies
View Related
Jun 8, 2009
I have a spreadsheet with around 1000 rows on data. in each row of data there is a number e.g. 2673 (all in their own cells) so in column A you would have a list of just numbers in another workbook, the number thats in each row corresponds to another value e.g. 2673 = CE103. So this workbook has 2 columns. In column "A" you have the numbers(2673) and in column "B" you have what that number matches with (CE103) i need a way of replacing all the numbers with what they equal
Workbook 1
A B C
2673 XXX XXX
513 XXX XXX
5107 XXX XXX
604 XXX XXX
Workbook 2
A B
2673 CE107
513 CDR57
5107 QV906
604 MNT57
There is an example of what i have (hope its understandable) and what i need is, the data from workbook 2 put in to workbook 1. So instead of having 2673 in workbook1, i would have CE107. And the same for the others e.g 513 would be CDR57.
View 4 Replies
View Related
Jan 24, 2010
1) What function can I use to replace a specific cell in spreadsheet 2 with what I type in a specific cell in spreadsheet 1 (e.g. type red in spreadsheet 1 in A1 and it will replace a blank cell A1 in spreadsheet 2 with red)? I have around a hundred spreadsheets which I need to name by typing a name in cell A1. Rather than doing this, I already have the names of the spreadsheets in a column.
2) Is there anyway to control the attributes of cells in another spreadsheet? E.g. change to bold, red and specific size font in cell A1 in spreadsheet 2 using cell A1 in spreadsheet 1.
View 2 Replies
View Related
