cel blokkeren voor users en enkel toegankelijk maken via een usersform

[guitar girl]

Hallo,

Ik zit vast.
Heb een document met verscheidene sheets.
Op 1 van de sheets is men verplicht gegevens in te voeren in 1 cel. Dit gebeurt via een users form die tevoorschijn komt zodra deze sheet wordt aangeklikt.
Nu zou ik graag hebben dat de user deze cel niet meer manueel kan overschrijven.

Hoe ik tot nu toe tewerk ging:

Heb de cel gelocked via Tools - Protection - Protect sheet.
Daarna heb ik voor deze sheet volgende code ingegeven:

Private Sub Worksheet_Activate()
Sheets("Calculations").Protect UserInterfaceOnly:=True
End Sub

De reden dat ik als subnaam voor "Worksheet_Activate" heb gekozen is omdat in deze sub ook verwerkt is dat de userform tevoorschijn moet komen na het aanklikken van de sheet.

Ik dacht dat deze sub mogelijk zou maken deze cel te blokkeren voor users, maar toch vrij zou houden om gegevens in de kleven via de usersform.
Niet dus
Krijg bericht dat de cel gelocked is...

Heeft iemand een andere oplossing?

 

[E v R]

Als ik zo kijk naar jouw beschrijving zou eea moeten werken, kun je een voorbeeldbestandje plaatsen waar ditzelfde probleem zich voordoet?

 

[Superzeeuw]

GG,

Hoe roep jij de Userform aan?

Wat jij hier hebt staan werkt enkel wanneer de volledige code door Worksheet_Activate wordt afgehandeld.
Je ziet dat je hier slechts 1 regel hebt staan en dan End Sub ziet verschijnen.
Er staat hier niet meer code dus houd de functie van de unprotect regel ook per direct op.