• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

Alle tabbladen beveiligen

Status
Niet open voor verdere reacties.

Tjico30

Gebruiker
Lid geworden
15 nov 2001
Berichten
342
Ik heb een sheet met 31 tabbladen en zou graag alle "beveiligde cellen" in alle tabbladen in eens willen beveiligen inplaats van tabblad voor tabblad.
Dit is nodig nadat ik een aanpassing moet maken in ieder tabblad afzonderlijk.
Wie kan mij helpen
 
Met een macro zo gebeurd.

Sub BeveiligingBladenAan()
'beveiliging alle werkbladen aanzetten
For i = 1 To Worksheets.Count
Worksheets(i).Protect password:="", DrawingObjects:=True, Contents:=True, Scenarios:=True,
Next
End Sub

Eventueel tussen de " bij password een wachtwoord invullen.


Om beveiliging voor alle sheets in een keer uit te zetten:

Sub BeveiligingBladenUit()
'beveiliging alle werkbladen uitzetten
For i = 1 To Worksheets.Count
Worksheets(i).Unprotect ("wachtwoord")
Next
End Sub

Vetgedrukte is alleen nodig als je een wachtwoord gebruikt
 
het uitzetten werkt goed alleen het weer aanzetten niet.
Volgens mij staat de "," achter "true" niet goed, maar als ik die weghaal geeft hij bij "next" een foutmelding
 
Je zou eens moeten proberen om de ASAP-utilities te downloaden en installeren. Dit is een omvangrijke verzameling Plug-Ins voor Excel die extra functies aan je menubalk toevoegt, waaronder jou gewenste optie.
Je kunt de ASAP-utilities hier downloaden :thumb:
 
Komma moet inderdaad weg.
Heb je sheets verborgen?
Dat zou de foutmelding kunnen veroorzaken.
 
Waar moet ik de code plaatsen?

Dag mensen,

Ik heb hetzelfde probleem. Ik heb een jaaroverzicht met uren met daarin 52 tabbladen welke zijn beveiligd. Als ik een kleine aanpassing wil doen, wil ik ze dus niet ��n voor ��n opheffen en weer beveiligen.

Nou is d� oplossing een macro. Ik heb hier een beetje mee gestoeit, maar verder dan een macro opnemen en die uit te voeren kom ik niet. Waar moet ik de code plaatsen genoemd in deze discussie en hoe kan ik hier gemakkelijk mee werken?

Bij voorbaat dank!

Groeten,

Erik
 
erikfieten,
maak even een nieuwe vraag.
deze is van 2004 dus erg belegen.
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan