Hoppa till huvudinnehåll

Hur ställer jag in lösenord för att skydda doldt ark i Excel?

Författare: Xiaoyang Senast ändrad: 2024-09-03

Om du har en arbetsbok som innehåller några viktiga dolda kalkylblad och inte tillåter andra att visa dem. Nu måste du ställa in ett lösenord för att skydda de dolda kalkylarken helt, när andra användare visar dem måste de ange lösenordet. Har du några sätt att hantera den här uppgiften snabbt och enkelt i Excel?

Ställ in lösenord för att skydda dolda ark med VeryHidden-funktionen

Ställ in lösenord för att skydda doldt ark med VBA-kod

Skydda flera kalkylblad samtidigt med Kutools för Excel


Ställ in lösenord för att skydda dolda ark med VeryHidden-funktionen

Normalt kan du använda VeryHidden-funktionen för att först dölja kalkylbladet och sedan ställa in ett lösenord för dem, gör så här:

1. Öppna din arbetsbok och håll kvar Alt + F11nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.

2. I Microsoft Visual Basic for Applications-fönstret, klicka på Visa > Project Explorer och Egenskaper Fönster to visa sina rutor.

klicka på Visa > Projektutforskaren och fönstret Egenskaper för att visa rutorna

3. Och sedan i Projekt-VBAProjekt välj kalkylbladet som du vill dölja och i Våra Bostäder Klicka på rullgardinsmenyn från Synlig avsnitt för att välja xlSheetMycketHidden alternativ, se skärmdump:

välj xlSheetVeryHidden i rutan Egenskaper

4. När du har gjort kalkylbladet mycket gömt kan du ställa in ett lösenord för att skydda det. I Microsoft Visual Basic for Applications-fönstret, klicka på Insert > Modulerna för att öppna en tom modul och klicka sedan på verktyg > VBAProjektegenskaper, se skärmdump:

klicka på Verktyg > VBAProject-egenskaper

5. Sedan i poppade ut VBAProject-Project Egenskaper dialogrutan, klicka Skydd fliken och kontrollera sedan Lås projekt för visning rutan, slutligen, ange och bekräfta lösenordet i Lösenord för att visa projektegenskaper avsnitt, se skärmdump:

ställ in alternativ i dialogrutan

6. Klicka sedan OK för att avsluta denna dialog och stäng Microsoft Visual Basic for Applications-fönstret.

7. Spara arbetsboken som Excel Macro-Enabled Workbook format och stäng det så att lösenordsskyddet träder i kraft.

Spara arbetsboken som Excel Macro-Enabled Workbook-format

8. Nästa gång, när du öppnar den här arbetsboken och vill göra de mycket dolda arken synliga, ombeds du att ange ett lösenord. Se skärmdump:

gör de mycket dolda arken synliga, du uppmanas att ange ett lösenord


Demo: Ställ in lösenord för att skydda dolda ark

 
en skärmdump av kutools för excel ai

Lås upp Excel Magic med Kutools AI

  • Smart utförande: Utför celloperationer, analysera data och skapa diagram – allt drivs av enkla kommandon.
  • Anpassade formler: Skapa skräddarsydda formler för att effektivisera dina arbetsflöden.
  • VBA-kodning: Skriv och implementera VBA-kod utan ansträngning.
  • Formeltolkning: Förstå komplexa formler med lätthet.
  • Textöversättning: Bryt språkbarriärerna i dina kalkylblad.
Förbättra dina Excel-funktioner med AI-drivna verktyg. Hämta hem nu och upplev effektivitet som aldrig förr!

Ställ in lösenord för att skydda doldt ark med VBA-kod

För att ställa in ett lösenord för att skydda dolda ark kan jag också prata om en VBA-kod åt dig.

1. Dölj ett kalkylblad som du vill skydda.

2. Håll ner ALT + F11 nycklar för att öppna Microsoft Visual Basic for Applications-fönstret.

3. Sedan Välj Denna arbetsbok från vänster Project Explorerdubbelklicka på den för att öppna Modulerna, och kopiera och klistra sedan in följande VBA-kod i den tomma modulen:

VBA-kod: Ställ in lösenord för att skydda doldt ark

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
Dim xSheetName As String
xSheetName = "Sheet1"
If Application.ActiveSheet.Name = xSheetName Then
    Application.EnableEvents = False
    Application.ActiveSheet.Visible = False
    xTitleId = "KutoolsforExcel"
    response = Application.InputBox("Password", xTitleId, "", Type:=2)
    If response = "123456" Then
        Application.Sheets(xSheetName).Visible = True
        Application.Sheets(xSheetName).Select
    End If
End If
Application.Sheets(xSheetName).Visible = True
Application.EnableEvents = True
End Sub

kopiera och klistra in koden i ThisWorkbook-modulen

Anmärkningar: I ovanstående kod, Sheet1 av xSheetName = "Sheet1" skript är det dolda kalkylbladets namn som du vill skydda, och 123456 i If response = "123456" Då script är lösenordet som du ställer in för det dolda arket. Du kan ändra dem efter dina behov.

4. Nu, när du vill visa det dolda arket, kommer en snabbruta att dyka upp för att låta dig ange lösenordet. Och den här rutan visas varje gång när du klickar för att visa det dolda arket.

gör de mycket dolda arken synliga, du uppmanas att ange ett lösenord


Skydda flera kalkylblad samtidigt med Kutools för Excel

Om du vill skydda flera valda eller alla kalkylblad i en arbetsbok samtidigt, måste du normalt skydda en efter en manuellt i Excel. Men om du har Kutools för Excel, med dess Skydda kalkylbladet verktyget kan du skydda dem med ett klick.

Kutools för Excel erbjuder över 300 avancerade funktioner för att effektivisera komplexa uppgifter, vilket ökar kreativiteten och effektiviteten. Förbättrad med AI-funktioner, Kutools automatiserar uppgifter med precision, vilket gör datahantering enkel. Detaljerad information om Kutools för Excel...         Gratis provperiod...

När du har installerat Kutools för Excel, gör så här:

1. Klicka Kutools Plus > Skydda kalkylbladet, se skärmdump:

klicka på Skydda kalkylbladsfunktionen i kutools

2. I Skydda kalkylbladet dialogrutan listas alla kalkylblad i arbetsboken i listrutan, välj de kalkylblad som du vill skydda. Se skärmdump:

välj de kalkylblad som du vill skydda

3. Och klicka sedan på OK, i följande dialogruta, ange ditt lösenord och skriv in det igen och klicka sedan på OK, kommer en annan snabbruta att dyka upp för att påminna dig om hur många kalkylblad som har skyddats.

ange ett lösenord och skriv det igen

4. Klicka sedan OK för att stänga dialogerna och alla arbetsblad i arbetsboken har skyddats med samma lösenord.

Notera: Om du vill avskydda alla kalkylblad på en gång behöver du bara klicka Kutools Plus > Avskydda kalkylbladet, och skriv ditt lösenord för att avbryta skyddet.

klicka på Kutools Plus > Unprotect Worksheet för att avbryta skyddet

 Ladda ner och testa gratis Kutools för Excel nu!


Relaterade artiklar:

Hur skyddar jag flera kalkylblad samtidigt i Excel?

Hur ställer jag in ett lösenord för att skydda arbetsboken?

Hur skyddar / låser man VBA-kod i Excel?

Bästa kontorsproduktivitetsverktyg

🤖 Kutools AI Aide: Revolutionera dataanalys baserat på: Intelligent utförande   |  Generera kod  |  Skapa anpassade formler  |  Analysera data och generera diagram  |  Anropa Kutools funktioner.
Populära funktioner: Hitta, markera eller identifiera dubbletter   |  Ta bort tomma rader   |  Kombinera kolumner eller celler utan att förlora data   |   Rund utan formel ...
Superuppslag: Flera kriterier VLookup    VLookup med flera värden  |   VSök över flera ark   |   Fuzzy Lookup ....
Avancerad rullgardinslista: Skapa snabbt en rullgardinslista   |  Beroende rullgardinslista   |  Flervals-rullgardinslista ....
Kolumnhanterare: Lägg till ett specifikt antal kolumner  |  Flytta kolumner  |  Växla synlighetsstatus för dolda kolumner  |  Jämför intervall och kolumner ...
Utvalda funktioner: Rutnätsfokus   |  Designvy   |   Stor formelbar    Arbetsbok & Bladhanterare   |  Resursbibliotek (Automatisk text)   |  Datumväljare   |  Kombinera arbetsblad   |  Kryptera/Dekryptera celler    Skicka e-postmeddelanden efter lista   |  Superfilter   |   Specialfilter (filtrera fet/kursiv/genomstruken...) ...
Topp 15 verktygssatser12 text verktyg (lägga till text, Ta bort tecken, ...)   |   50+ Diagram Typer (Gantt Chart, ...)   |   40+ Praktiskt Formler (Beräkna ålder baserat på födelsedag, ...)   |   19 Införande verktyg (Infoga QR-kod, Infoga bild från sökväg, ...)   |   12 Konvertering verktyg (Siffror till ord, Valutaväxling, ...)   |   7 Slå ihop och dela verktyg (Avancerade kombinera rader, Dela celler, ...)   |   ... och mer

Uppgradera dina Excel-färdigheter med Kutools för Excel och upplev effektivitet som aldrig förr. Kutools för Excel erbjuder över 300 avancerade funktioner för att öka produktiviteten och spara tid.  Klicka här för att få den funktion du behöver mest...


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!