• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Excel Online Collaboration

GB

Member
Hi,
does anyone know a way that I can share a excel online spreadsheet that is shared with many people, but I only want each person to have access to their own range within a worksheet. E.G. person A can edit rows 2:5, person b can edit rows 6:9 etc.

Alternatively, if the above is not possible can I share one worksheet to person A, and another worksheet to person B within the same workbook?

Any other suggestions are welcome.

regards
GB
 
Excel was never designed for what you are wanting to achieve, you could end up with one all mighty mess
 
Hi @GB

I agree with @bobhc... it can become a mess.

In any case, if you wish to go ahead and try it, I have a suggestion that can be a start... something like the code below (please see attached):
Code:
Private Sub Workbook_Open()

    Sheets(1).Unprotect

    Dim pass As String
    Dim c As Range
   
    pass = InputBox("Password", "Please enter password")
       
    For Each c In Sheets(1).Range("A1:S20")
        If c.Locked = False Then
            c.Locked = True
        End If
    Next c
   
    If pass = "pass1" Then
        Sheets(1).Range("A1:S10").Locked = False
        Sheets(1).Range("A1:S10").Interior.ColorIndex = 4
    ElseIf pass = "pass2" Then
        Sheets(1).Range("A10:S20").Locked = False
        Sheets(1).Range("A10:S20").Interior.ColorIndex = 4
    Else
    MsgBox "Password incorrect", vbExclamation
    ActiveWorkbook.Close savechanges = False
    End If
   
    Sheets(1).Protect

End Sub

Use "pass1" or "pass2" and see the effect... Depending on the pass provided it will change the unlocked range and lock everything else

Hope this helps
 

Attachments

  • PermissionsTest.xlsm
    14.6 KB · Views: 2
Back
Top