Jak nastavit heslo k ochraně skrytého listu v aplikaci Excel?
Pokud máte sešit, který obsahuje některé důležité skryté listy, a nedovolte ostatním, aby je odkryly. Nyní musíte nastavit heslo k úplné ochraně skrytých listů, když je ostatní uživatelé skryjí, musí zadat heslo. Máte nějaké způsoby, jak se s tímto úkolem rychle a snadno vypořádat v aplikaci Excel?
Nastavte heslo pro ochranu skrytých listů pomocí funkce VeryHidden
Nastavte heslo pro ochranu skrytého listu pomocí kódu VBA
Chraňte více pracovních listů najednou pomocí Kutools pro Excel
Nastavte heslo pro ochranu skrytých listů pomocí funkce VeryHidden
Za normálních okolností můžete pomocí funkce VeryHidden nejdříve skrýt listy a poté pro ně nastavit heslo, proveďte následující kroky:
1. Otevřete sešit a podržte Alt + F11klávesy pro otevření Okno Microsoft Visual Basic pro aplikace.
2. V Okno Microsoft Visual Basic pro aplikace, Klepněte na tlačítko Pohled > Průzkumník projektu a Okno Vlastnosti to zobrazit jejich podokna.
3. A pak v Projekt-VBAProjekt v podokně vyberte list, který chcete skrýt, a v Nemovitosti v podokně klikněte na rozevírací seznam z okna viditelný pro výběr xlSheetVeryHidden možnost, viz screenshot:
4. Poté, co je list velmi skrytý, můžete nastavit heslo, které ho chrání. V Okno Microsoft Visual Basic pro aplikace, Klepněte na tlačítko Vložit > Modul otevřete prázdný modul a poté klikněte Tools > Vlastnosti VBAProject, viz screenshot:
5. Pak vyskočil Vlastnosti projektu VBAProject , klepněte na tlačítko OK Ochrana a potom zkontrolujte Uzamknout projekt pro prohlížení do pole nakonec zadejte a potvrďte heslo v poli Heslo pro zobrazení vlastností projektu sekce, viz screenshot:
6. Pak klikněte na tlačítko OK tlačítko pro ukončení tohoto dialogu a zavření Okno Microsoft Visual Basic pro aplikace.
7. Uložte sešit jako Sešit se zvýšeným makra Excel formát a zavřete jej, aby se ochrana heslem projevila.
8. Až příště otevřete tento sešit a chcete zviditelnit velmi skryté listy, budete požádáni o zadání hesla. Viz snímek obrazovky:
Demo: Nastavte heslo k ochraně skrytých listů
Nastavte heslo pro ochranu skrytého listu pomocí kódu VBA
Abych nastavil heslo na ochranu skrytých listů, mohu pro vás také mluvit o kódu VBA.
1. Skrýt jeden list, který chcete chránit.
2. Podržte ALT + F11 klávesy pro otevření Okno Microsoft Visual Basic pro aplikace.
3. Pak zvolte Tato pracovní kniha zleva Průzkumník projektupoklepáním otevřete soubor Modula poté zkopírujte a vložte následující kód VBA do prázdného modulu:
Kód VBA: Nastavte heslo k ochraně skrytého listu
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
Poznámka: Ve výše uvedeném kódu, Sheet1 z xSheetName = "List1" skript je název skrytého listu, který chcete chránit, a 123456 v If response = "123456" Tak skript je heslo, které nastavíte pro skrytý list. Můžete je podle potřeby změnit.
4. Nyní, když chcete zobrazit skrytý list, se zobrazí okno s výzvou k zadání hesla. Toto pole se zobrazí pokaždé, když klepnutím zobrazíte skrytý list.
Chraňte více pracovních listů najednou pomocí Kutools pro Excel
Pokud chcete chránit více vybraných nebo všech listů sešitu najednou, obvykle je musíte chránit jeden po druhém ručně v aplikaci Excel. Ale pokud ano Kutools pro Excel, S jeho Chraňte pracovní list nástroj, můžete je chránit jedním kliknutím.
Kutools pro Excel : s více než 300 praktickými doplňky Excel, můžete si je vyzkoušet bez omezení do 30 dnů. |
Po instalaci Kutools pro Excel, postupujte následovně:
1, klikněte Kutools Plus > Chraňte pracovní list, viz screenshot:
2. V Chraňte pracovní list V dialogovém okně jsou všechny listy v sešitu uvedeny v seznamu, vyberte listy, které chcete chránit. Viz snímek obrazovky:
3. A pak klikněte na tlačítko OK, v následujícím dialogovém okně zadejte heslo a znovu jej zadejte, poté klikněte na OK, vyskočí další výzva, která vám připomene, kolik pracovních listů bylo chráněno.
4. Pak klikněte na tlačítko OK zavřete dialogy a všechny listy v sešitu byly chráněny stejným heslem.
Poznámka: Pokud chcete zrušit ochranu všech pracovních listů najednou, stačí kliknout Kutools Plus > Odemknout pracovní lista zrušte ochranu zadáním hesla.
Stáhněte si zdarma zkušební verzi Kutools pro Excel!
Související články:
Jak chránit více listů najednou v aplikaci Excel?
Jak nastavit heslo k ochraně sešitu?
Jak chránit / uzamknout kód VBA v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!