View Custom View with Sheet Protection
 

I have excel running estimates for me. I have 3 diff prices which can be
picked from. I have this all set up. I want to lock the prices so noone can
change them. I also have custom views set up, so that instead of print 5
pages, you can print out only the information important to your estimate.
But when I lock the price cells, I can not access my custom views. Is there
a way to set this up diff, so I can still lock the cells i need locked and
view my custom views?

Thanks
John

View Custom View with Sheet Protection
 

John

You will have unprotect, change views then reprotect.

Best way to do this is with a macro.

Sub Change_View()
ActiveSheet.Unprotect Password:="justme"
ActiveWorkbook.CustomViews("my view").Show
ActiveSheet.Protect Password:="justme"
End Sub

If you are wanting to change views for printing, use this code in Thisworkbook.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.Unprotect Password:="justme"
ActiveWorkbook.CustomViews("my view").Show
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveWorkbook.CustomViews("other view").Show
ActiveSheet.Protect Password:="justme"
End Sub


Gord Dibben MS Excel MVP

On Fri, 16 Feb 2007 08:19:23 -0800, John H <John
wrote:

I have excel running estimates for me. I have 3 diff prices which can be
picked from. I have this all set up. I want to lock the prices so noone can
change them. I also have custom views set up, so that instead of print 5
pages, you can print out only the information important to your estimate.
But when I lock the price cells, I can not access my custom views. Is there
a way to set this up diff, so I can still lock the cells i need locked and
view my custom views?

Thanks
John