Jak chránit kontingenční tabulku v aplikaci Excel?
Jak v aplikaci Excel můžeme chránit kontingenční tabulku, abychom zabránili ostatním uživatelům přetahovat pole nebo pokazit rozložení? V tomto článku budu hovořit o některých metodách ochrany kontingenční tabulky v listu.
Chraňte kontingenční tabulku pomocí kódu VBA
Chraňte kontingenční stůl, ale umožněte přístup k průřezu
Chraňte kontingenční tabulku pomocí kódu VBA
Následující kód VBA vám pomůže chránit kontingenční tabulku, udělejte to takto:
1. Podržte ALT + F11 klávesy pro otevření Microsoft Visual Basic pro aplikace okno.
2, klikněte Vložit > Modula vložte následující kód do Modul Okno.
Kód VBA: ochrana kontingenční tabulky
Sub RestrictPivotTable()
'Updateby Extendoffice
Dim xpf As PivotField
Application.ScreenUpdating = False
With ActiveSheet.PivotTables(1)
.EnableDrilldown = False
.EnableFieldList = False
.EnableFieldDialog = False
.PivotCache.EnableRefresh = False
For Each xpf In .PageFields
With pf
.DragToPage = False
.DragToRow = False
.DragToColumn = False
.DragToData = False
.DragToHide = False
End With
Next xpf
End With
Application.ScreenUpdating = False
MsgBox "The pivot table has been protected!", vbInformation, "Kutools for Excel"
End Sub
3. Pak stiskněte tlačítko F5 klíč ke spuštění tohoto kódu a zobrazí se okno s výzvou, které vám připomene, že kontingenční tabulka byla chráněna, viz screenshot:
Poznámky:
1. Tento kód zakáže mnoho funkcí v kontingenční tabulce, například zabrání uživatelům v přetahování některého z polí na jiné místo a zakáže seznam polí, nastavení polí, rozevírací seznam a funkci Obnovit.
2. Pokud je na aktivním listu více kontingenčních tabulek, použije se tento kód pouze na poslední kontingenční tabulku.
Chraňte kontingenční stůl, ale umožněte přístup k průřezu
Někdy možná budete chtít chránit kontingenční tabulku, ale umožníte přístup k průřezu pro použití funkce filtru, následující kroky vám mohou udělat laskavost.
1. Po vložení průřezu klikněte pravým tlačítkem na něj a vyberte Velikost a vlastnosti z kontextové nabídky viz screenshot:
2. V Formátovat průřez podokno, klepněte na tlačítko Nemovitosti rozbalte možnosti a zrušte zaškrtnutí Zamčený možnost, viz screenshot:
3. Poté zavřete podokno a klikněte na přezkoumání > Chraňte plech k ochraně tohoto listu, viz screenshot:
4. Ve vyskočené Chraňte plech dialogové okno a poté zkontrolujte Vyberte odemčené buňky a Použijte kontingenční tabulku a kontingenční graf možnosti pouze v Povolit všem uživatelům tohoto listu seznamu a poté zadejte heslo a potvrďte ho, viz screenshot:
5. Pak klikněte na tlačítko OK Tlačítko zavřete dialogy a nyní, když kliknete na zprávu kontingenční tabulky a pokusíte se ji změnit, nebude upravena, ale můžete použít funkci Kráječ podle potřeby.
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!