Ga naar hoofdinhoud

Hoe kan ik objecten in een beschermd werkblad in Excel bewerken?

Standaard kunnen de ingevoegde objecten zoals vormen en tekstvakken niet worden bewerkt nadat het werkblad is beveiligd. Als u objecten in een beschermd werkblad moet bewerken, probeer dan de methoden in dit artikel.

Sta het bewerken van objecten in een beschermd werkblad toe door de optie Objecten bewerken aan te vinken
Sta bewerk objecten toe in een beschermd werkblad met VBA-code


Sta het bewerken van objecten in een beschermd werkblad toe door de optie Objecten bewerken aan te vinken

Vink de optie Objecten bewerken aan om het bewerken van objecten toe te staan ​​voordat u het werkblad beschermt. Ga als volgt te werk.

1. klikken Review > Bescherm het blad.

2. In de Bescherm het blad dialoogvenster, geeft u een wachtwoord op in het Wachtwoord om blad te ontgrendelen vakje en vink het Bewerk objecten in het vak Alle gebruikers van dit werkblad toestaan ​​en klik vervolgens op het OK knop. Bevestig uw wachtwoord in het Bevestig uw wachtwoord dialoog venster. Zie screenshot:

Nu is het werkblad beveiligd en kunnen alle objecten in dit beschermde werkblad worden bewerkt.


Sta bewerk objecten toe in een beschermd werkblad met VBA-code

Als het werkblad al is beveiligd, kunt u het onderstaande VBA-script proberen om bewerkingsobjecten toe te staan. Ga als volgt te werk.

1. druk de anders + F11 toetsen tegelijkertijd om het Microsoft Visual Basic voor toepassingen venster.

2. In de Microsoft Visual Basic voor toepassingen venster, dubbelklik Dit Werkboek links Project paneel. Kopieer en plak vervolgens de onderstaande VBA-code in het ThisWorkbook (code) venster.

VBA-code: laat bewerkingsobjecten toe in een beschermd werkblad

Private Sub Workbook_Open()
    Application.ScreenUpdating = False
    On Error Resume Next
    With Worksheets("Sheet3")
        .EnableOutlining = True
        .EnableAutoFilter = True
        .Protect Password:="123", _
        Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True, _
        AllowFormattingCells:=True
    End With
    Application.ScreenUpdating = True
End Sub

Note: In de code is Sheet3 het beveiligde werkblad dat de objecten bevat die u moet bewerken. En nummer "123" is het wachtwoord van het beveiligde blad. Wijzig ze indien nodig.

3. druk de F5 sleutels om de code uit te voeren, en alle objecten in dit beveiligde werkblad kunnen onmiddellijk worden bewerkt.


Gerelateerde artikelen:

Beste Office-productiviteitstools

🤖 Kutools AI-assistent: Een revolutie teweegbrengen in de data-analyse op basis van: Intelligente uitvoering   |  Genereer code  |  Aangepaste formules maken  |  Analyseer gegevens en genereer grafieken  |  Roep Kutools-functies aan...
Populaire functies: Zoek, markeer of identificeer duplicaten   |  Verwijder lege rijen   |  Combineer kolommen of cellen zonder gegevens te verliezen   |   Ronde zonder formule ...
Super opzoeken: Meerdere criteria VLookup    VLookup met meerdere waarden  |   VOpzoeken over meerdere bladen   |   Fuzzy opzoeken ....
Geavanceerde vervolgkeuzelijst: Maak snel een vervolgkeuzelijst   |  Afhankelijke vervolgkeuzelijst   |  Multi-select vervolgkeuzelijst ....
Kolom Beheerder: Voeg een specifiek aantal kolommen toe  |  Kolommen verplaatsen  |  Schakel de zichtbaarheidsstatus van verborgen kolommen in  |  Vergelijk bereiken en kolommen ...
Uitgelichte functies: Raster focus   |  Ontwerpweergave   |   Grote formulebalk    Werkmap- en bladbeheer   |  resource Library (Auto-tekst)   |  Datumkiezer   |  Combineer werkbladen   |  Cellen coderen/decoderen    Stuur e-mails per lijst   |  Super filter   |   Speciaal filter (filter vet/cursief/doorhalen...) ...
Top 15 gereedschapsets12 Tekst Tools (toe te voegen tekst, Tekens verwijderen, ...)   |   50+ tabel Types (Gantt Chart, ...)   |   40+ Praktisch Formules (Bereken leeftijd op basis van verjaardag, ...)   |   19 Invoeging Tools (QR-code invoegen, Afbeelding invoegen vanaf pad, ...)   |   12 Camper ombouw Tools (Getallen naar woorden, Currency Conversion, ...)   |   7 Samenvoegen en splitsen Tools (Geavanceerd Combineer rijen, Gespleten cellen, ...)   |   ... en meer

Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie als nooit tevoren. Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en tijd te besparen.  Klik hier om de functie te krijgen die u het meest nodig heeft...

Omschrijving


Office-tabblad Brengt een interface met tabbladen naar Office en maakt uw werk veel gemakkelijker

  • Schakel bewerken en lezen met tabbladen in Word, Excel, PowerPoint in, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en vermindert honderden muisklikken voor u elke dag!
Comments (1)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi,
thanks for the helpful article. I tried the VBA Code method but it doesn't quite work for me.


My Code (sorry for formatting, couldn't copy&past it):


Sub Workbook_Open ()

Dim ws As Worksheet

For Each ws In Worksheets

ws.Protect UserInterfaceOnly:=True, Password:="123"

ws.Enable AutoFilter = True

ws.EnableOutlining = True

If ActiveSheet.Protection.AllowFormattingColumns = False Then

ActiveSheet.Protect AllowFormattingColumns:=True

End If

With Worksheets ("Sheet1")

.EnableOutlining = True

.EnableAutoFilter = True

.Protect Password:="123", _

Contents:=True, DrawingObjects:=False, UserInterfaceOnly:=True

End With

Next ws

End Sub


It works just fine but as soon as I'm saving, closing and reopening the file, I am either

- requested to insert the Password (like 5 times) immediately or

- able to remove the protection without any Password for one of the worksheets (usually "Sheet1" as in the Code)


Is somebody getting the same error as me? Or can somebody help me?


Thank you in advance.


BR

Vanessa
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations