Hur tillåter jag att redigera objekt i ett skyddat kalkylblad i Excel?

Som standard kan de infogade objekten som former, textrutor inte redigeras efter att kalkylbladet har skyddats. Om du behöver redigera objekt i ett skyddat kalkylblad, prova metoderna i den här artikeln.

Tillåt redigera objekt i ett skyddat kalkylblad genom att markera alternativet Redigera objekt
Tillåt redigera objekt i skyddat kalkylblad med VBA-kod

Tillåt redigera objekt i ett skyddat kalkylblad genom att markera alternativet Redigera objekt

Fantastisk! Använda effektiva flikar i Excel som Chrome, Firefox och Safari!

Spara 50% av din tid och minska tusentals musklick åt dig varje dag!

Kontrollera alternativet Redigera objekt för att tillåta redigering av objekt innan du skyddar kalkylbladet. Gör så här.

1. klick översyn > Skydda arket.

2. I Skydda arket dialogrutan, ange ett lösenord i Lösenord för att skydda bort arket kryssrutan och markera kryssrutan Redigera objekt i rutan Tillåt alla användare av det här kalkylbladet och klicka sedan på OK knapp. Bekräfta ditt lösenord i Bekräfta lösenord dialog ruta. Se skärmdump:

Nu är kalkylbladet skyddat och alla objekt i det skyddade kalkylbladet kan redigeras.

Tillåt redigera objekt i skyddat kalkylblad med VBA-kod

Om kalkylbladet redan har skyddats kan du prova nedanstående VBA-skript för att tillåta redigeringsobjekt. Gör så här.

1. tryck på andra + F11 samtidigt för att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer dubbelklicka Denna arbetsbok till vänster Projekt ruta. Kopiera sedan och klistra in nedanstående VBA-kod i Denna arbetsbok (kod) fönster.

VBA-kod: Tillåt redigera objekt i ett skyddat kalkylblad

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

Anmärkningar: I koden är Sheet3 det skyddade kalkylbladet som innehåller objekten du behöver redigera. Och siffran "123" är lösenordet för det skyddade arket. Ändra dem efter behov.

3. tryck på F5 för att köra koden, och alla objekt i det skyddade kalkylbladet kan redigeras omedelbart.

Relaterade artiklar:

De bästa Office-produktivitetsverktygen

Kutools för Excel löser de flesta av dina problem och ökar din produktivitet med 80%

återanvändning: Sätt snabbt i komplexa formler, diagram och allt som du har använt tidigare; Kryptera celler med lösenord; Skapa e-postlista och skicka e-post ...
Super Formula Bar (enkelt redigera flera rader med text och formel); Läslayout (enkelt läsa och redigera ett stort antal celler); Klistra in i filtrerat intervall...
Sammanfoga celler / rader / kolumner utan att förlora data; Delat cellinnehåll; Kombinera duplicerade rader / kolumner... Förhindra duplicerade celler; Jämför intervall...
Välj Duplicera eller Unikt Rader; Välj tomma rader (alla celler är tomma); Super Find och Fuzzy Find i många arbetsböcker; Slumpmässigt val ...
Exakt kopia Flera celler utan att ändra formelreferens; Skapa referenser automatiskt till flera ark; Sätt in kulor, Kryssrutor och mer ...
Extrahera text, Lägg till text, ta bort efter position, Ta bort mellanslag; Skapa och skriva ut personsökningstalsatser; Konvertera mellan celler innehåll och kommentarer...
Superfilter (spara och tillämpa filterscheman på andra ark); Avancerad sortering efter månad / vecka / dag, frekvens och mer; Specialfilter av fet, kursiv ...
Kombinera arbetsböcker och arbetsblad; Sammanfoga tabeller baserat på nyckelkolumner; Dela data i flera ark; Batchkonvertera xls, xlsx och PDF...
Mer än 300 kraftfulla funktioner. Stöder Office / Excel 2007-2021 och 365. Stöder alla språk. Enkel implementering i ditt företag eller organisation. Fullständiga funktioner 30 dagars gratis provperiod. 60 dagars pengarna tillbaka-garanti.

Läs mer... Gratis nedladdning... Köp...

Fliken Office ger ett flikgränssnitt till Office och gör ditt arbete mycket enklare

Aktivera flikredigering och läsning i Word, Excel, PowerPoint, Publisher, Access, Visio och Project.
Öppna och skapa flera dokument i nya flikar i samma fönster, snarare än i nya fönster.
Ökar din produktivitet med 50 % och minskar hundratals musklick för dig varje dag!

Läs mer... Gratis nedladdning... Köp...

Kommentarer (1)

Inga betyg än. Bli först med att betygsätta!

vanessa

ca 2 år sedan

#33482

Denna kommentar minimerades av moderatoren på webbplatsen

Hej,
tack för den hjälpsamma artikeln. Jag provade VBA-kodmetoden men det fungerar inte riktigt för mig.

Min kod (förlåt för formateringen, kunde inte kopiera&klistra in den):

Sub Workbook_Open ()

Dim ws As Arbetsblad

För varje är i arbetsblad

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

ws.Enable AutoFilter = True

ws.EnableOutlining = Sant

Om ActiveSheet.Protection.AllowFormattingColumns = False Då

ActiveSheet.Protect AllowFormattingColumns:=True

End If

Med arbetsblad ("Sheet1")

.EnableOutlining = Sant

.EnableAutoFilter = Sant

.Protect Password:="123", _

Innehåll:=True, DrawingObjects:=False, UserInterfaceOnly:=True

Sluta med

Nästa ws

End Sub

Det fungerar bra men så fort jag sparar, stänger och öppnar filen igen, gör jag antingen

- ombedd att ange lösenordet (som 5 gånger) omedelbart eller

- kunna ta bort skyddet utan något lösenord för ett av kalkylbladen (vanligtvis "Sheet1" som i koden)

Är det någon som får samma fel som jag? Eller kan någon hjälpa mig?

Tack på förhand.

BR

vanessa

Svara

Det finns inga kommentarer här ännu

Lämna dina kommentarer

Postar som gäst

Logga in

Namn (Krävs)

E-post (Obligatoriskt)

Betygsätt detta inlägg:

Återställa

0 Tecken

Jag godkänner termer och villkor