Opgelost Spinner in beveiligd werkblad zijn ding laten doen

[peter59]

Hallo,

Ik heb in een specifiek werkblad (Dienstrooster) een spinner geplaatst.
Deze doet zijn ding als dit specifieke werkblad niet beveiligd is.

Ik dacht dat even op te lossen met onderstaande code maar helaas.

Sub JaarRooster_Spinner1_BijWijzigen()

     ActiveSheet.Unprotect
       ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True

End Sub

 

[HSV]

Deblokkeer de LinkedCell.

 

[peter59]

Hallo Harry

Hoe eenvoudig kan het zijn.
In mijn geval is dit cel $I$1.

Dank hiervoor.

 

[AHulpje]

Verwijder het vinkje bij "Geblokkeerd" onder "Grootte en Eigenschappen" van je Slicer, en geen macro aan je Slicer koppelen.

 

[peter59]

Hallo AHulpje

Deze had ik al gevonden maar dat was dus in eerste instantie, jammer maar helaas.
Maar met de extra hint van Harry, gehele probleempje opgelost.

Algemene vraag. De als zijnde "opgelost" knop is deze verdwenen in dit nieuwe format van HelpMij?

 

[AHulpje]

Was vergeten te vermelden dat je bij het beveiligen van het werkblad ook even "Autofilter" moet aanvinken, dan werkt de slicer wel.