BattleChip
Gebruiker
- Lid geworden
- 15 aug 2004
- Berichten
- 43
Dit is de macro om alle bladen in één keer te beveiligen:
Sub beveiligen()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
ws.Protect
Next ws
End Sub
en deze om de boel weer terug te draaien:
Sub beveiligingopheffen()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
ws.UnProtect
Next ws
End Sub
Als ik wat beveilig dan doe ik dat met alléén de functie "Ontgrendelde cellen selecteren" AAN.
Dus je kunt alléén maar de cellen kiezen waar wat ingevuld kan worden.
Bladen apart beveiligen gaat prima, alles functioneert naar wens.
Echter als ik de bovenstaande macro's gebruik dan kan ik tóch de beveiligde cellen selecteren. Ik kan er niets mee doen en niets invullen, maar ik kán ze selecteren.
Reden waarom ik het niet wil is:
als je de tab functie gebruikt of de pijltoetsen om naar de volgende cel te gaan om iets in te vullen niet eerst alle andere tussenliggende cellen door moet drukken.
Wat moet er aan de beveiligingsmacro verandert worden om het goed te krijgen.
Eerst alles apart beveiligen maakt niets uit.
Zodra je een blad weer van beveiliging af haalt en weer beveiligd met de bovenstaande macro dan kun je plotseling weer alle cellen selecteren.
Wie O wie ¿?
Sub beveiligen()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
ws.Protect
Next ws
End Sub
en deze om de boel weer terug te draaien:
Sub beveiligingopheffen()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Sheets
ws.UnProtect
Next ws
End Sub
Als ik wat beveilig dan doe ik dat met alléén de functie "Ontgrendelde cellen selecteren" AAN.
Dus je kunt alléén maar de cellen kiezen waar wat ingevuld kan worden.
Bladen apart beveiligen gaat prima, alles functioneert naar wens.
Echter als ik de bovenstaande macro's gebruik dan kan ik tóch de beveiligde cellen selecteren. Ik kan er niets mee doen en niets invullen, maar ik kán ze selecteren.
Reden waarom ik het niet wil is:
als je de tab functie gebruikt of de pijltoetsen om naar de volgende cel te gaan om iets in te vullen niet eerst alle andere tussenliggende cellen door moet drukken.
Wat moet er aan de beveiligingsmacro verandert worden om het goed te krijgen.
Eerst alles apart beveiligen maakt niets uit.
Zodra je een blad weer van beveiliging af haalt en weer beveiligd met de bovenstaande macro dan kun je plotseling weer alle cellen selecteren.
Wie O wie ¿?
