Jak chránit kontingenční tabulku v aplikaci Excel?

Jak bychom mohli v Excelu chránit kontingenční tabulku, abychom zabránili ostatním uživatelům přetahovat pole nebo zkazit rozvržení? V tomto článku se budu zabývat některými metodami 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 můžete chtít chránit kontingenční tabulku a zároveň povolit přístup k průřezu pro použití funkce filtru. Následující kroky vám mohou pomoci.

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 si 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.