Custom View When Other Sheets Protected,
Nov 29, 2007I have a workbook with 3 spreadsheets. When I put ptotection on 2 of the sheets, the custom view will not work on the other. Any way to make the views work?
View 5 RepliesI have a workbook with 3 spreadsheets. When I put ptotection on 2 of the sheets, the custom view will not work on the other. Any way to make the views work?
View 5 RepliesExcel 2007 - need to adjust protected view settings but the protected view tab is missing from my Trust Centre settings - have the following tabs - trusted publisher / location, add-ins, activeX, macro, message bar, external content and privacy options. Document is a revenue authority download and without being able to adjust the protected view settings, can't input data.
View 3 Replies View RelatedA client has sent me an Excel workbook that appears on the screen with the message adivising that it is Protected View as a result of having been downloaded from the internet. If I click on the Enable Editing button the workbook is completely deactivated. I have played around with my Trust Centre settings but nothing seems to work.
View 1 Replies View RelatedOpening several files and combining them into 1 workbook. The files will not open - due protected view......
How do I allow the files to be opened to be copied?
I am trying to set a custom view when exiting, but I keep getting runtime error 424 saying an object is required. I am attempting to unprotect the sheets, check the value of an option button, set the custom view based on that value, and then protect the sheets. Please keep in mind that the user may or may not be on the sheet containing the option button when exiting. Here is the code I am having trouble with.
Private Sub Workbook_BeforeClose(Cancel As Boolean)
Call UnprotectSheets 'Unlock to set option button value
With Worksheets("Customer_Info")
If btnExistCust.Value = True Then
ActiveWorkbook.CustomViews("Sales_Exist").Show
Else
ActiveWorkbook.CustomViews("Sales_New").Show
End If
End With
Call ProtectSheets 'Call the sub before closing
End Sub
I need to create a macro that whenever the user clicks the restore down button it will not restore down, but either do nothing, or make the application display full screen. The following code runs when the workbook opens and whenever a different sheet is activated and I would like it to run when the user clicks the restore down button.
Private Sub Workbook_Open()
Application. ScreenUpdating = False
Application.DisplayFormulaBar = False
Application.ShowWindowsInTaskbar = False
Sheets("01").Select
With ActiveWindow
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With............................
I have a large spreadsheet from which I need to create separate Reports by hiding various rows and columns. I have followed instructions for creating a couple of Custom Views (View tab, Custom Views, Add, Inserted Name, OK, Saved the document) but nothing happens apart from getting the message "Some view settings could not be applied". In fact none of the view settings were applied.
View 1 Replies View RelatedWhen I click the excel printing icon, I want a userform to pop up in which I make the choice for a certain customview that I build. This customview must then be printout. Note that I want to use the standard Excel print icon, not a custommade one in the worksheet. I figured out some code, but it doesn't work. For instance my if structure returns "false" even if I did click that commandbutton, see the code below.
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Static PrintRequest As Boolean
formMyview.Show
If formMyview.CmdCancel= True Then
MsgBox "printrequest canceled"
Unload Me
cancel=True
Exit Sub
End If
If PrintRequest = True Then
Exit Sub
End If
If formMyview.CmdOk = True Then
For Each Myoption In frameViewoptions.Controls
If Myoption.Value = True Then..........................
I have a very wide sheet in which I have hidden and saved seven views.I am using it for a very long time but when i did some edit work in the 'full' view,the other views are not showing. In stead I am getting the messages "cannot shift objects off sheet" and "some view settings could not be applied".This is very frustrating since a lot of patience was tested while making this wide data.
View 2 Replies View Relatedis there a way to cause my custom menu items to grey out like the built-in ones, depending on the current selection or when the status of the active worksheet/workbook changes (e.g. when the book is protected to disallow certain actions)?
Obviously I can trap any problems once the associated VBA is invoked, but it'd be more professional if I could just prevent that from happening in the first place.
I have received following macro from someone to delete series but the problem is that it gives error when some sheets are protected, and I want those sheets to protected. When run it will ignore/leave protected sheets but delete series only from unprotected sheets
Private Sub CommandButton1_Click()
Dim Rng As Range, i As Long, r As Range, lVal, uVal
Dim DeleteCount As Double
Dim lRow As Long
Dim dr As Long
Dim dc As Long
dc = Sheets("Deleted Numbers").UsedRange.Columns.Count - 1
dr = Cells(Rows.Count, Sheets("Deleted Numbers").UsedRange.Columns.Count - 1).End(xlUp).Row + 1
If dr = 60001 Then ................
I am using some protected workbooks and cannot see the tabs at the bottom of the screen.
I have tried going to tools/options/etc
I have tried viewing full screen
If I copy the current sheet 1 and paste it into a new workbook I can then see tabs (but only sheet 1 has copied data).
how can i see hidden sheets in a workbook?
View 3 Replies View RelatedI have an excel document with about 7 worksheets in it. The users of these worksheets can save the document but they never save it with the page view starting from the top. How can i ensure that whenever this document is open the default view for all the contained worksheets is at the top (ie:cell a1).
View 2 Replies View RelatedRemember Lotus used to do this?
I have on one sheet - 600 rows of financial products by 100 regions worth of $ balances and on another identically formatted sheet the associated interest rates.
I just want to page down on the $balances tab and have interest rates tab move in sync - letting me eyeball the related info.
I've tried searching for an hour to come up with the right terms - split, freeze, etc.
I have a spreadsheet which is used for STAT purposes at work, there are 14 users who use this spreadsheet.
The sheets are named after a user, i.e my sheet is under 'Steve'.
The problem I have is, I have a sheet thats unhidden on the spreadsheet (the rest are all hidden)
What i want is a form to open and request a username and password, or to gain the user name from there windows logon.
After the spreadsheet has recoginsed whom is entering the sheet, i want the spreadsheet to display there individual sheet, and keep everyone elses hidden.
I don't want them to have access to any sheet other than there own.
I then want an administrator logon, where that person can see all sheets.
I have a workbook which, on opening, shows a logon form and depending on the username and password entered only certain sheets open - there are about 10 usernames and passwords - i have only included 2 to keep the code a bit shorter. I got the code below from here and it works perfectly but I want to make it a bit easier to add new usernames and passwords and am thinking of using a Vlookup table. The code i currently use is:
Option Explicit
Const sName1 As String = "Lisa"
Const sName2 As String = "Philip"
Const sPw1 As String = "update"
Dim sPW As String, sUser As String
Dim sMsg As String, sTitle As String, sStyle As String
Dim iCounta As Integer
Private Sub cmbValidate_Click()
sTitle = "Incorrect Password"...........
I was just reading an answer to a question re: printing a set area.
Dave Hawley mentioned the best method would be to set a "Custom View".
how to "call" a custom view from a Userform dropdown?
I need to print several "reports" which are seperate parts of the same sheet.
I have a workbook that is setup with headers and footers. To the right, left, and below the worksheet there are other pages greyed out pages that are not being used. Is there a way to change the view and potentially remove these "other sheets?"
View 3 Replies View RelatedI have an excel spreadsheet I have created as a printable form. It all fits nicely onto one page. I would like to be able to email it to people and have it look like a one-page form. It looks great in Page Layout view, but the only problem is that there are a bunch of extra sheets that show up as well. Is there any way to remove/hide these extra sheets that are not needed? Or is there another way to send this out so that it comes to folks as a one-page form so that they can alter the data in the cells but not the page formatting?
View 1 Replies View RelatedWhat i am trying to do: Create a login option to filter what worksheets each user can see. I need the users to be able to view 2 sheets not just 1. Also i need an admin login that can view all sheets. I want to keep the workbook protected so even though they can see and edit those two sheets they can only edit certain unlocked cells. Admin should be able to view/edit all cells on all sheets.
Below is my code which is made for a sample workbook. I was just trying to get the concept down and then i would convert it to the real workbook.
Form Code:
[Code].....
i want to protect my all sheets at once
View 3 Replies View RelatedI have a spreadsheet with some macros in it. When I run the macros, I would like to unprotect the worksheet and then protect the spreadsheets when the macros are done. The excel tabs I would like to protect/unprotect are called Graph and Data.
View 3 Replies View RelatedI have a workbook that is protected by password. I have to unprotect sheets.
How can I unprotect sheets and workbooks while I am updating or changing?
I need a simple Macro that will, sheet by sheet, search the entire workbook. However, it only needs to search Column A, and there need be no text box, because the user will not define the text. The search text will simply be "X"
The real issue that I'm having is that I need it to find the first item, then offer me the option of selecting "Next" "Previous" or "Cancel" "Cancel" of course would mean that the item found is the one being searched for.
Everything works fine except when I password protect the sheet. Then when the autofilter is used an error message is triggered and the error relates to the first range selected in the combobox code. However, the combobox itself works fine on the protected sheet as I included code to unprotect the sheet at the beginning of the code run by the combobox and reprotect it at the end.
Any advice suggestions gratefully received.
I have the following code as workbook module but it is not working, I have tried fiddling with it but I cannot work out what is wrong, can anyone help please.
Private Sub Workbook_Open()
Dim ws As Worksheet ....
I've created a shared spreadsheet with multiple sheets. All the content was created to be visible without having to scroll at 87%. My question is can I protect or lock the zoom level so that when anyone else opens the spreadsheet, it will only be visible at 87%? I have my screen resolution at "Smallest" so not sure if that too will affect the viewing level.
View 7 Replies View RelatedI have a userforms which transfers data to protected sheets.The userforms worked until i protected each sheet.Can there be any code which i add to the current userform code so it can still transfer the data to protected sheets
The other issue also is now that the sheets are protected the Outlining also does not work.Can this also be changed so the Outlining works on protected sheets
I have 5 userforms which all transfer data.
[Code].....
I am attempting to run a macro that will do a find and replace on a protected sheet but this is not working. I am using the following code to Protect all Sheets, which I found on this site when workbook opens using the Workbook Open Event and uses UserInterFaceOnly :
Private Sub Workbook_Open()
Dim wSheet As Worksheet
For Each wSheet In Worksheets
wSheet.Protect Password:="111", _
UserInterFaceOnly:=True
Next wSheet
End Sub
And then a find and replace similar to this:
Sub FindAndReplace()
Selection.Replace What:="w", Replacement:="a", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub