Hallo forum gebruikers,
Ik ben opzoek naar wat ik denk eenvoudige VBA code maar krijg hem zelf helaas niet gemaakt. Ik heb een excel werkblad welke voor een groot deel al beveiligd is door middel van 'Blad beveiliging'. Echter enkele cellen moeten kunnen worden ingevuld door collega's. Nadat de collega's deze cellen hebben gevuld wil ik doormiddel van een CommandButton een selectie van nog niet vergrendelde cellen kunnen vergrendelen.
hiervoor gebruik ik nu onderstaande VBA code;
Deze doet in principe wat ik bedoel alleen hij werkt niet op het moment dat het blad beveiligt is. wat doe ik verkeerd of wie kan mijn code aanpassen?
alvast bedankt voor de reacties
Ik ben opzoek naar wat ik denk eenvoudige VBA code maar krijg hem zelf helaas niet gemaakt. Ik heb een excel werkblad welke voor een groot deel al beveiligd is door middel van 'Blad beveiliging'. Echter enkele cellen moeten kunnen worden ingevuld door collega's. Nadat de collega's deze cellen hebben gevuld wil ik doormiddel van een CommandButton een selectie van nog niet vergrendelde cellen kunnen vergrendelen.
hiervoor gebruik ik nu onderstaande VBA code;
Code:
Private Sub CommandButton1_Click()
Selection.Locked = True
Selection.FormulaHidden = False
End SubDeze doet in principe wat ik bedoel alleen hij werkt niet op het moment dat het blad beveiligt is. wat doe ik verkeerd of wie kan mijn code aanpassen?
alvast bedankt voor de reacties
