Hi All,
I am having some trouble trying with macros; when my file is created it is sent out afterwards to be edited by certain individuals. These individuals need to be able to ungroup, grouped areas edit certain columns and most of the cells are locked, also this macro needs to run automatically when they open the file.. I have a macro which works to protect the sheets and fufill all of those reuirements, what i don't know how to do is then share and protect with track changes as well as a password and keep all of the features. This is the macro i currently use:
Sub Workbook_open()
For Each ws In Sheets
With ws
.Unprotect Password:="MyPassword"
.Protect Password:="MyPassword", UserInterfaceOnly:=True
.EnableOutlining = True
End With
Next ws
End Sub
Sub UnProtectAll()
Dim wSheet As Worksheet
Dim Pwd As String
Pwd = InputBox("Enter your password to unprotect all worksheets", "Password")
On Error Resume Next
For Each wSheet In Worksheets
wSheet.Unprotect Password:=Pwd
Next wSheet
If Err <> 0 Then
MsgBox "You have entered an incorrect password. All worksheets could not " & _
"be unprotected.", vbCritical, "Incorrect Password"
End If
On Error GoTo 0
End Sub
This is an essential peice of work and any assistance would be much appreciated.
If this is not possible - is it possible to have all of this run and be able to track changes when they open the file?
Many thanks.
Bookmarks