| Home |
| Search |
| Today's Posts |
|
#1
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
sheet protection in excel 2003 version
Hi I am ravi raja. i have excel 2003 version. i have problem with my excel
file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#2
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
Dear Raviraja,
Please read up on workbook protection in Excel's Help menu. -- Regards, Ashish Mathur Microsoft Excel MVP www.ashishmathur.com "Raviraja LIC" <Raviraja wrote in message ... Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#3
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
Hi,
Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#4
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
You obviously know more about Excel 2009 than we do. Is there anything more
that you can tell us? For Excel 2003, hide the sheet (Format/ Sheet/ Hide), then Tools/ Protection/ Protect Workbook, and add a password to protect the workbook. Without the password you can't unhide the sheet. -- David Biddulph "Raviraja LIC" <Raviraja wrote in message ... Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#5
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
Hi Mike
I installed your macro and when you see "sheet2" tab and clic on it, the popup menu opens and request a password to see sheet2. Now you type anything and the tab sheet2 disappear. If you save the file and close it: when you reopen the file, sheet2 is hidden and you can't reopen it because the popup menu I guess is triggered by clicking on sheet tab2. I deleted the macro, saved it and close the file, When i reopen the file , sheet2 is still hidden. ( its only a test workbook ). It looks like a good way to hide the sheet if we can reopen it somehow. I tried different ways ( not an expert ) but looks interesting. Would you comment or let us know how to open sheet2 Regards John "Mike H" wrote in message ... Hi, Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#6
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
John,
There was an error in it. Unhide the hidden sheet and try this version Private Sub Workbook_SheetActivate(ByVal Sh As Object) MySheet = "Sheet1"' Change to suit If ActiveSheet.Name = MySheet Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets(MySheet).Visible = True Application.EnableEvents = False Sheets(MySheet).Select Application.EnableEvents = True End If End If Sheets(MySheet).Visible = True End Sub Mike "John" wrote: Hi Mike I installed your macro and when you see "sheet2" tab and clic on it, the popup menu opens and request a password to see sheet2. Now you type anything and the tab sheet2 disappear. If you save the file and close it: when you reopen the file, sheet2 is hidden and you can't reopen it because the popup menu I guess is triggered by clicking on sheet tab2. I deleted the macro, saved it and close the file, When i reopen the file , sheet2 is still hidden. ( its only a test workbook ). It looks like a good way to hide the sheet if we can reopen it somehow. I tried different ways ( not an expert ) but looks interesting. Would you comment or let us know how to open sheet2 Regards John "Mike H" wrote in message ... Hi, Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#7
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
Hi Mike
Thank you for your reply. You can't unhide the sheet. (Nice) You may have stumble on something here. We know that the protection is poor in XL but this one looks good if you can not easily find a way to reopen sheet2 BTW your second macro works fine. Would be interesting to know if it can be reopen. Regards John "Mike H" wrote in message ... John, There was an error in it. Unhide the hidden sheet and try this version Private Sub Workbook_SheetActivate(ByVal Sh As Object) MySheet = "Sheet1"' Change to suit If ActiveSheet.Name = MySheet Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets(MySheet).Visible = True Application.EnableEvents = False Sheets(MySheet).Select Application.EnableEvents = True End If End If Sheets(MySheet).Visible = True End Sub Mike "John" wrote: Hi Mike I installed your macro and when you see "sheet2" tab and clic on it, the popup menu opens and request a password to see sheet2. Now you type anything and the tab sheet2 disappear. If you save the file and close it: when you reopen the file, sheet2 is hidden and you can't reopen it because the popup menu I guess is triggered by clicking on sheet tab2. I deleted the macro, saved it and close the file, When i reopen the file , sheet2 is still hidden. ( its only a test workbook ). It looks like a good way to hide the sheet if we can reopen it somehow. I tried different ways ( not an expert ) but looks interesting. Would you comment or let us know how to open sheet2 Regards John "Mike H" wrote in message ... Hi, Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#8
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
John
Mike's macro did not make the sheet veryhidden, just not visible. You should be able to unhide simply by FormatSheetUnhide and providing the password. Gord Dibben MS Excel MVP On Thu, 27 Nov 2008 10:31:54 -0500, "John" wrote: Hi Mike Thank you for your reply. You can't unhide the sheet. (Nice) You may have stumble on something here. We know that the protection is poor in XL but this one looks good if you can not easily find a way to reopen sheet2 BTW your second macro works fine. Would be interesting to know if it can be reopen. Regards John "Mike H" wrote in message ... John, There was an error in it. Unhide the hidden sheet and try this version Private Sub Workbook_SheetActivate(ByVal Sh As Object) MySheet = "Sheet1"' Change to suit If ActiveSheet.Name = MySheet Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets(MySheet).Visible = True Application.EnableEvents = False Sheets(MySheet).Select Application.EnableEvents = True End If End If Sheets(MySheet).Visible = True End Sub Mike "John" wrote: Hi Mike I installed your macro and when you see "sheet2" tab and clic on it, the popup menu opens and request a password to see sheet2. Now you type anything and the tab sheet2 disappear. If you save the file and close it: when you reopen the file, sheet2 is hidden and you can't reopen it because the popup menu I guess is triggered by clicking on sheet tab2. I deleted the macro, saved it and close the file, When i reopen the file , sheet2 is still hidden. ( its only a test workbook ). It looks like a good way to hide the sheet if we can reopen it somehow. I tried different ways ( not an expert ) but looks interesting. Would you comment or let us know how to open sheet2 Regards John "Mike H" wrote in message ... Hi, Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
|
#9
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
|
sheet protection in excel 2003 version
Hi Gord
Your right, thanks. I knew i was'nt very good at this, but learning. Thanks again Regards John "Gord Dibben" <gorddibbATshawDOTca wrote in message ... John Mike's macro did not make the sheet veryhidden, just not visible. You should be able to unhide simply by FormatSheetUnhide and providing the password. Gord Dibben MS Excel MVP On Thu, 27 Nov 2008 10:31:54 -0500, "John" wrote: Hi Mike Thank you for your reply. You can't unhide the sheet. (Nice) You may have stumble on something here. We know that the protection is poor in XL but this one looks good if you can not easily find a way to reopen sheet2 BTW your second macro works fine. Would be interesting to know if it can be reopen. Regards John "Mike H" wrote in message ... John, There was an error in it. Unhide the hidden sheet and try this version Private Sub Workbook_SheetActivate(ByVal Sh As Object) MySheet = "Sheet1"' Change to suit If ActiveSheet.Name = MySheet Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets(MySheet).Visible = True Application.EnableEvents = False Sheets(MySheet).Select Application.EnableEvents = True End If End If Sheets(MySheet).Visible = True End Sub Mike "John" wrote: Hi Mike I installed your macro and when you see "sheet2" tab and clic on it, the popup menu opens and request a password to see sheet2. Now you type anything and the tab sheet2 disappear. If you save the file and close it: when you reopen the file, sheet2 is hidden and you can't reopen it because the popup menu I guess is triggered by clicking on sheet tab2. I deleted the macro, saved it and close the file, When i reopen the file , sheet2 is still hidden. ( its only a test workbook ). It looks like a good way to hide the sheet if we can reopen it somehow. I tried different ways ( not an expert ) but looks interesting. Would you comment or let us know how to open sheet2 Regards John "Mike H" wrote in message ... Hi, Alt +F11 to open VB editor. Double click 'This workbook' and paste the code below in. This does what you want but is totally insecure. If a user doesn't enable macros they see your formula. Anyone with even a small amount of knowledge and Google would view your sheet in seconds. So really my advice is don't do it. Private Sub Workbook_SheetActivate(ByVal Sh As Object) If ActiveSheet.Name = "Sheet2" Then ActiveSheet.Visible = False response = InputBox("Enter password to view sheet") If response = "MyPass" Then Sheets("Sheet2").Visible = True Application.EnableEvents = False Sheets("sheet2").Select Application.EnableEvents = True End If End If End Sub Mike "Raviraja LIC" wrote: Hi I am ravi raja. i have excel 2003 version. i have problem with my excel file. I have 2 sheets in that file. sheet no.1 and sheet no.2. I dont want my clients to see the contents of sheet no.2 since it contains formulas. i want to protect the sheet no.2 with a password. If some one click the "sheet no.2", it should not open without a password. Also, i came to know that this facility is available in excel 2009. I am not able to download the excel 2009 version. pl help. my email id is " Thanks Ravi Raja |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Chart from version 2003 to version 2007 | Charts and Charting in Excel | |||
| How can I get the same colors from 2003 version to 2007 version? | Excel Discussion (Misc queries) | |||
| download trial version excel 2003? can only find trial version 200 | Excel Discussion (Misc queries) | |||
| Excel 2003 Sheet Protection Issues | Excel Discussion (Misc queries) | |||
| Recover earlier version of excel sheet after new version saved? | Excel Discussion (Misc queries) | |||
Linear Mode
