Excel bestand beveiligen tegen bewerken

[Meaurk]

Hallo,

Ik wil graag mijn excel betsand beveiligen tegen bewerken voor bepaalde personen binnen de organisatie. Dit zou via een wachtwoord kunnen, maar ook via de gebruikersnaamvan Windows.
Onderstaande code heb ik gevonden op helpmij, maar helaas doet hij niet precies wat ik wil.

Private Sub Workbook_Open()

Application.ScreenUpdating = False
On Error GoTo Fout:

If Application.UserName = "Medewerker 1" Then GoTo Doen
If Application.UserName = "Medewerker 2" Then GoTo Doen
GoTo AlleenLezen

Doen:
MsgBox "Bestand beschikbaar om te wijzigen"
Exit Sub

Fout:
Application.DisplayAlerts = False
ActiveWorkbook.Close
Exit Sub

AlleenLezen:
MsgBox "Het bestand wordt geopend als alleen lezen, wijzingen worden niet opgeslagen"
Application.DisplayAlerts = False

End Sub

Ik wil namelijk dat maar 3 medewerkers van heel de organisatie toegang hebben om dit bestand te bewerken. Alle overige medewerkers moeten automatisch een bericht krijgen dat det bestand als alleen lezen is geopend en dus niets aangepast kan worden.

Is dit mogelijk? Zo ja, hoe?
Alvast bedankt!

 

[snb]

- maak een bestand dat bewerkbaar is voor 3 medewerkers.
- zet dat in een verborgen folder/map/directory
- zorg dat deze 3 medewerkers het bestand alleen kunnen openen met behulp van een macro
- zorg dat het bewerkte bestand, voordat het definitief wordt opgeslagen, als kopie naar een openbare map/folder/directory wordt geschreven
- desnoods geef je dat kopiebestand nog een alleen-lezen attribuut mee.
- alle andere medewerkers kunnen dat bestand openen; als geen alleen-lezen atrribuut: iedere wijziging daar heeft geen effekt op het 'moeder'bestand.

 

[Meaurk]

Het klinkt vrij logisch, maar moet ik dan niet steeds het 'kopie bestand' blijven vernieuwen? Anders krijgen de andere medewerkers de wijzigingen toch niet mee?