Is there a way to either hide or disable the worksheet menu bar on ONE SHEET ONLY, so that a right-click customize doesn't even work on that sheet. I want the user to be able to do nothing but what my customized toolbar allows on that sheet.
View 5 RepliesI have an Excel 2003 program that contains macros. One of the macros hides certain command bars and disables the worksheet menu bar. On close the opposite is true. The problem is, if a user uses the disable macros when opening then the worksheet menu bar and other command bars are still available. I would like to hide all of the data sheets and display another sheet that would normally be hidden displaying a message that the macros have to be enabled for the program to work correctly if disable macros is chosen. When the enable macros are used I would like the Error page to be hidden.
View 6 Replies View RelatedI need to disable the "save as" file menu command when a user opens a shared document. Upon exit I want to enable the save as so that other opened worksheets are not affected. This code works: CommandBars("File").Controls("Save As...").Enabled = False
My problem is this. I can activate this command by selecting run in the VB editor.
But I need for this action to be automatic when a user opens the worksheet. I did this in the editor:
Under general
Sub dISABLESAVEAS()
CommandBars("File").Controls("Save As...").Enabled = False
End
Sub WORKSHEET_BEFORECLOSE()
CommandBars("File").Controls("Save As...").Enabled = True
End
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
i have 2 macro icons.
i want to disable the icons after its clicked once.
I am creating a fool proof, well as near as I can get it, spreadsheet for them to work in and want them to follow the rules I set out!!
I am able to disable cut, copy, paste etc but was wondering if it was possible for to disable to use of the "Delete" function from the menu when you right click on a cell and also disable to the Delete key on the keyboard?
I want to disable the functions via right mouse click on a sheet tabs to workbook users.
As the programmer I may need to access these function on occasion.
My VBA is password protected to keep other users out.
Is it possible to disable or grey out the windows options in the Tools>options tab?
How can I disable the SAVE and PRINT options under Office Button, in excel 2007??? I've tried a macro that I used in 2003 version, but it not works (problem: "File" menu)!!!
View 2 Replies View RelatedIs there a code or a way to make it impossible to make permanent changes to a file without first saving it as something else? I have a master report that is done monthly.
I do not want anyone to be able to save any changes on the master report. How do I go about disabling save and the save as funtions in excel? I have a save as command button that I only want people to use.
Also is there a way to set up a print command button to print to any computers default printer? I have set up a print command button on my computer and it works fine on mine, but I have sent the file to another person and the button is not doing anything on their computer. I assume because we don't have the same computers.
I would like my custom menus to act like builtin menus - specifically I would like them to be disabled (grayed out or even entirely removed) when the application is in Cell Edit Mode (I cant believe I am the first to ask about this but I cant find the answer elsewhere).
It sure seems confusing to offer users access to a seemingly active command when it does not run (in edit mode I mean).
I send huge lumps of Karma to any willing to share ideas or solutions.
I am creating a spreadsheet that I only want to have a customised toolbar (to stop the client changing things) as a result I would like to hide the standard worksheet menu bar on opening the spreadsheet. Can anyone please provide a bit of code as tried macro recorder but if you uncheck the toolbar in the toolbar options drop down it re appears on closing the toolbar options box.
View 9 Replies View RelatedI'm trying to disable the [x] in the upper right hand corner to force my users to use my "Close Workbook" button, but not sure how to do it. Then, was thinking that I might just want to hide the entire Application Title bar...
View 9 Replies View RelatedThis is the code I use to temporarily remove menu barsfor a spreadsheet that is managed by user forms. I have code at the close of the program to replace the menu bars. The code work well although and it places a list of enabled bars in the range C1:C50 on the sheet "Bars". The range C1:C50 is not locked before the sub routine 'Hide Menus' runs. However after the sub routine 'Hide Menus' runs, the range C1:C50 is always locked and I don't understand why this is so, I would prefer it not to be.
Sub HideMenus()
Application. ScreenUpdating = False
i = 0
Worksheets("bars").Range("c1:c50").Clear
On Error Resume Next
For Each Allbars In Application. CommandBars
If Allbars.Visible = True Then
i = i + 1
With Worksheets("bars")
.Cells(i, 3) = Allbars.Name
If Allbars.Name = "Worksheet Menu Bar" Then
Allbars.Enabled = False
Else
Allbars.Visible = False
End If
End With
End If
Next
Application.DisplayFormulaBar = False
On Error Goto 0
Application.ScreenUpdating = True
Opening.Show
End Sub
I have a workbook that I created as an interface for my workplace. I disabled the File, Menu, Edit, etc...menu bars through .Control("x").Visible = False and .Enable = False as well
Now when I open a new workbook all the menus are there still which is good but when I open a previously saved workbook all the menus are missing. Is there a way where I can have ONLY my workbook have the menus gone and for them to appear in other workbooks that were saved?
Is there any option to deactivate the "Disable macros"
Or
When i open the userform it asks for enable and diable macros. If i click "Disable macros" then the users can manipulate the data inside the excel sheet. i need to avoid this problem.
So, is there any option that if i do "Disable macro" then the corresponding sheet for the which the Userform is linked should not be visible or hidden.
I am trying to allow uses of a spreadsheet to be able to select one control button which would in turn disable another one via check boxes however the control buttons do not re-enable when the undo check box is selected.
Sub Lead_REC()
' Set screen behaviour
Application. ScreenUpdating = False
Application.DisplayAlerts = False
Application.EnableEvents = False
' Defer error handling
On Error Resume Next
Err.Clear
Below are the codes to hide the objects within Excel, Disable Keyboard shortcuts and disable right click, all are placed in the ThisWorkbook and i placed them in a 'Private Sub Workbook_Open()' function.
VB:
'Change 'False' to 'True' to unhide
ActiveWindow.DisplayGridlines = False
ActiveWindow.DisplayHeadings = False
[Code]....
There maybe simpler ways to do the above i just don't know them, it's just these have worked for me and i have had zero bugs come back from them!
I have a workbook of some 15 worksheets - however there is just one of the worksheets I want to disable the printing of it. So that when users select print whole document - all worksheets will print except for thus one worksheet
The worksheet tab is named "15.ADMIN WORKBOOK CONTROL ONLY"
I know I need to put some vba code into the code area of that worksheet
I tried this code but it didnt work
Private Sub Worksheet_BeforePrint(Cancel As Boolean)
Cancel = True
End Sub
I have buttons on each of my sheets, when one is clicked code is called in my module ("modAPI"), and from that code I wish to disable and enable certain buttons, and/or change the caption of those buttons. However when I try to do:
With ws
btnRefresh.Enabled = False
End With
I get Error 424, Object Required. I've tried recording a macro of what I wish to do, and it gives me ActiveSheet.Shapes("btnRefresh").Select, but this doesn't give me the option to enabled/disable or change the caption of the button.
i was trying to hide my worksheet menu bar, i was searching the web & i got this macro
View 3 Replies View RelatedIs their a way to the Enlargen Worksheet Tab Menu in Excel 2003?
I tend to like to have 20-30 worksheets in one file, and its a pain to slide back and forth between the sets of tabs instead of just having one large visible menu with ALL 20-30 TABS.
Script that lists the caption names of all work sheet commandbar buttons, one script to list them on a worksheet and another to list them in a listbox.
View 5 Replies View RelatedI have a spreadsheet which has extra worksheets at the end that the user can move around, if they need them.
Then i found out that users were adding there own sheets, so i protected the workbook, but i found out that this stops the user from moving the sheet.
Whats the easiest way probably using code to disable the worksheet functions, ie the ones that appear if you click on the tab (insert,delete,rename,move+copy,select all sheets etc) but still allow the user to move the sheet within the workbook
I have a pivot table that's made visible from a "Drill Down" button on the source worksheet.
View 4 Replies View RelatedI want to have a Checkbox (Form) that is in my Worksheet to disable/gray-out once it is selected. I don't want people to be able to uncheck it again. I want them to be forced to click another Checkbox to enable it again.
Example:
Two Checkboxes:
Check Box 1 = "Apply"
Check Box 2 = "Delete"
Once "Apply" is checked, gray it out. This will force a user to click "Delete" in order for the "Apply" button to be enabled again. I do not want a user to click "Apply" once selected as their way of 'deleting' the information.
Is it possible to disable the copy/paste functions on a particular worksheet within a workbook, or failign that, on a complete workbook?
I 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 would like to disable cut/copy/paste and maybe delete inside a worksheet. Reading earlier threads on this subject provided the code to put in the ThisWorkbook module, where it works great for all my worksheets. However, there is one worksheet where it is necessary to have copy/paste, either with control c or right click/copy. Here is part of that code provided by Tom Urtis:
Private Sub Workbook_Activate()
Application.CutCopyMode = False
Application.OnKey "^c", ""
Application.CellDragAndDrop = False
End Sub
What do I replace Application with to work on just the worksheet level?
Is there any method to disable notification / error message of password protected sheet when we try to edit restricted cells?
Note: In my scenario I've to allow user to select protected cell; that's why cell selection redirection is not useful for my.