Can individual sheets be password protected within a single workbo

[Jorge E. Jaramillo]

In my company we have some collaborative work and to make things easier for
the area coordinating the tasks, results are compiled in a sigle Excel file
(workbook) with a specific sheet for each topic.

In order to avoid that people from one area could tamper or accidentally
alter the contents of another area's information, can each individual sheet
be password protected so that only the people that know this password can
change its content?

Thanks

Jorge E Jaramillo

 

[L. Howard Kittle]

Hi Jorge,

Excel security is quite weak, almost any non beginner can bust the password
for a worksheet in just a few minutes. If the co-workers "respect" the fact
the sheet is protected then it may help.

Otherwise don't put anything super secret under worksheet protection.

Tools > Protection > Protect worksheet > enter your password > OK out.

HTH
Regards,
Howard

 

[Jorge E. Jaramillo]

Thanks I'll try it.

Jorge E

Hi Jorge,

Excel security is quite weak, almost any non beginner can bust the password
for a worksheet in just a few minutes. If the co-workers "respect" the fact
the sheet is protected then it may help.

Otherwise don't put anything super secret under worksheet protection.

Tools > Protection > Protect worksheet > enter your password > OK out.

HTH
Regards,
Howard

 

[L. Howard Kittle]

For your info...

You may put in a password as "HJ45qw", (no quotes) but running the breaker
code may give you a possible solution in a message box that looks like
this...

AABBBA

When you click OK on the message box, the worksheet is unprotected.

Not even close to your password, but that is another show as to why.

HTH
Regards,
Howard

 

[Jorge E. Jaramillo]

You lost me with "running the breaker code", could you please ellaborate on
this?

Thanks

Jorge

 

[L. Howard Kittle]

There are macros that will break the password. Here is one from an unkown
author.

Sub PasswordBreaker_Sheet()
'Author unknown
'Breaks worksheet password protection.
Dim i As Integer, j As Integer, k As Integer
Dim l As Integer, m As Integer, n As Integer
Dim i1 As Integer, i2 As Integer, i3 As Integer
Dim i4 As Integer, i5 As Integer, i6 As Integer
On Error Resume Next
For i = 65 To 66: For j = 65 To 66: For k = 65 To 66
For l = 65 To 66: For m = 65 To 66: For i1 = 65 To 66
For i2 = 65 To 66: For i3 = 65 To 66: For i4 = 65 To 66
For i5 = 65 To 66: For i6 = 65 To 66: For n = 32 To 126
ActiveSheet.Unprotect Chr(i) & Chr(j) & Chr(k) & _
Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & Chr(i3) & _
Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
If ActiveSheet.ProtectContents = False Then
MsgBox "One usable password is " & Chr(i) & Chr(j) & _
Chr(k) & Chr(l) & Chr(m) & Chr(i1) & Chr(i2) & _
Chr(i3) & Chr(i4) & Chr(i5) & Chr(i6) & Chr(n)
Exit Sub
End If
Next: Next: Next: Next: Next: Next
Next: Next: Next: Next: Next: Next
End Sub

Copy this into the VB editor of the protected sheet and run it. May take a
minute or three and you will get a message box showing a usable password,
however, the worksheet is already unprotected as you read the message, you
just need to click OK on the message box and have your way with the
worksheet.

Regards,
Howard

Having some "send" problems so you may see this twice.