Jak zabránit ostatním v vkládání listu do aplikace Excel?
Předpokládejme, že máte sešit, který bude odeslán ostatním uživatelům k prohlížení nebo kontrole jeho obsahu, ale nechcete, aby ostatní do tohoto sešitu vkládali nové listy, aby se zabránilo zamotání sešitu. V tomto článku budu hovořit o tom, jak zabránit ostatním v vkládání listů do sešitu.
Zabraňte ostatním v vkládání listu pomocí funkce Chraňte sešit
Zabraňte ostatním v vkládání listu s kódem VBA
Zabraňte ostatním v vkládání listu pomocí funkce Chraňte sešit
Excel poskytuje funkci - Chraňte sešit s ním můžete chránit strukturu sešitu, která se nebude vkládat, mazat, přejmenovávat ani provádět jiné operace. Postupujte prosím následovně:
1. Přejít na kliknutí přezkoumání > Chraňte sešit, viz screenshot:
2. V Chraňte strukturu a okna v dialogovém okně zaškrtněte Struktura možnost a do textového pole zadejte heslo, klikněte na OK pro zobrazení Potvrďte heslo dialogové okno a znovu zadejte heslo. Zobrazit snímky obrazovky:
![]() |
![]() |
![]() |
3. Pak klikněte na tlačítko OK zavřete dialogová okna a nyní, když do tohoto sešitu vložíte nový list, nebude funkce vložit list k dispozici.
Poznámka: S touto funkcí umožňují použití v tomto sešitu také následující šedé položky.
Zabraňte ostatním v vkládání listu s kódem VBA
Pokud chcete ostatním zabránit v vkládání pracovních listů, ale můžete také provádět jiné operace, výše uvedená metoda má své omezení. Následující kód VBA vám může udělat laskavost.
1. Otevřete sešit, který chcete deaktivovat, a vložte pracovní listy.
2. Poté přidržte ALT + F11 klíče a otevře se Okno Microsoft Visual Basic pro aplikace.
3. Vlevo Projekt VBA v podokně poklepejte Tato pracovní kniha k otevření Modul, poté zkopírujte a vložte následující kód.
Kód VBA: zabraňte ostatním v vkládání listu
Private Sub Workbook_NewSheet(ByVal Sh As Object)
'Update 20140623
With Application
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Sh.Delete
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End With
MsgBox "disable to add sheets"
End Sub
4. Poté tento kód uložte a zavřete, vraťte se do sešitu a nyní, když se pokusíte do tohoto sešitu vložit nový list, vyskočí výstražné okno, které vám připomene, že nelze vložit listy. Viz snímek obrazovky:
Související články:
Jak zabránit uživatelům v tisku listu?
Jak zakázat klíč nápovědy F1 v aplikaci Excel?
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své excelentní dovednosti pomocí Kutools for Excela 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áší rozhraní s kartami do Office 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!
