ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Don't unhide my worksheets (https://www.excelbanter.com/excel-programming/375551-re-dont-unhide-my-worksheets.html)

[email protected]

Don't unhide my worksheets
 
In your active sheet,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sheet2.Visible = xlSheetVisible Then
Sheet2.Visible = xlSheetHidden
End If
End Sub

Dean wrote:
I wrote a macro that hides worksheets under certain conditions. Is there a way so that users can't simply unhide those sheets, perhaps via some sort of password they wouldn't know? Does the workBOOK need to be protected to accomplish this? If so, what are the other adverse implications of protecting a workbook? I don't want a cure worse than the disease.

Thanks!
Dean
------=_NextPart_000_0011_01C6F3AE.02124A50
Content-Type: text/html; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
X-Google-AttachSize: 892

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"
<HTML<HEAD
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1"
<META content="MSHTML 6.00.2900.2963" name=GENERATOR
<STYLE</STYLE
</HEAD
<BODY bgColor=#ffffff
<DIV<FONT face=Arial size=2I wrote a macro that hides worksheets under certain
conditions.&nbsp; Is there a way so that users can't simply unhide those sheets,
perhaps via some sort of password they wouldn't know?&nbsp; Does the workBOOK
need to be protected to accomplish this?&nbsp; If so, what are the other adverse
implications of&nbsp;protecting a workbook?&nbsp; I don't want a cure worse than
the disease.</FONT</DIV
<DIV<FONT face=Arial size=2</FONT&nbsp;</DIV
<DIV<FONT face=Arial size=2Thanks!</FONT</DIV
<DIV<FONT face=Arial size=2Dean</FONT</DIV</BODY</HTML

------=_NextPart_000_0011_01C6F3AE.02124A50--



Dean[_8_]

Don't unhide my worksheets
 
I may not understand your answer. My fear is that someone who gets my
workbook will know enough to unhide the worksheets we don't want them to be
able to see. The designation as a "very hidden" worksheet posted just after
yours sounds quite promising but, if I don't use that, I want to understand
what you are saying.

It seems like your approach won't stop them from unhiding the worksheet. It
just is an easy way to rehide it, if anyone wants to. That is not my
problem. If this will, indeed, automatically rehide the sheet every time
they try to unhide it, then I need to understand how to assign that to only
the hidden sheets. Kindly confirm/explain.


wrote in message
ps.com...
In your active sheet,
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Sheet2.Visible = xlSheetVisible Then
Sheet2.Visible = xlSheetHidden
End If
End Sub

Dean wrote:
I wrote a macro that hides worksheets under certain conditions. Is there
a way so that users can't simply unhide those sheets, perhaps via some
sort of password they wouldn't know? Does the workBOOK need to be
protected to accomplish this? If so, what are the other adverse
implications of protecting a workbook? I don't want a cure worse than
the disease.

Thanks!
Dean
------=_NextPart_000_0011_01C6F3AE.02124A50
Content-Type: text/html; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
X-Google-AttachSize: 892

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"
<HTML<HEAD
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1"
<META content="MSHTML 6.00.2900.2963" name=GENERATOR
<STYLE</STYLE
</HEAD
<BODY bgColor=#ffffff
<DIV<FONT face=Arial size=2I wrote a macro that hides worksheets under
certain
conditions.&nbsp; Is there a way so that users can't simply unhide those
sheets,
perhaps via some sort of password they wouldn't know?&nbsp; Does the
workBOOK
need to be protected to accomplish this?&nbsp; If so, what are the other
adverse
implications of&nbsp;protecting a workbook?&nbsp; I don't want a cure
worse than
the disease.</FONT</DIV
<DIV<FONT face=Arial size=2</FONT&nbsp;</DIV
<DIV<FONT face=Arial size=2Thanks!</FONT</DIV
<DIV<FONT face=Arial size=2Dean</FONT</DIV</BODY</HTML

------=_NextPart_000_0011_01C6F3AE.02124A50--






All times are GMT +1. The time now is 08:26 AM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com