Skip to main content

Conas an tábla pivot a chosaint in Excel?

Údar: Xiaoyang Athraithe Deiridh: 2020-06-05

In Excel, conas a d’fhéadfaimis an tábla pivot a chosaint chun cosc ​​a chur ar úsáideoirí eile na réimsí a tharraingt nó an leagan amach a chur suas? An t-alt seo, labhróidh mé faoi roinnt modhanna chun an tábla pivot a chosaint sa bhileog oibre.

Tábla pivot a chosaint le cód VBA

Cosain tábla pivot ach lig rochtain ar an slicer


mboilgeog cheart gorm saighead Tábla pivot a chosaint le cód VBA

Is féidir leis an gcód VBA seo a leanas cabhrú leat an tábla pivot a chosaint, déan mar seo le do thoil:

1. Coinnigh síos an ALT + F11 eochracha a oscailt Microsoft Visual Basic d’Fheidhmchláir fhuinneog.

2. Cliceáil Ionsáigh > Modúil, agus greamaigh an cód seo a leanas sa Modúil Fuinneog.

Cód VBA: tábla pivot a chosaint

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. Ansin brúigh F5 eochair chun an cód seo a rith, agus tiocfaidh bosca pras amach le cur i gcuimhne duit go bhfuil an tábla pivot cosanta, féach an scáileán:

doc tábla pivot 1 a chosaint

Nótaí:

1. Díchumasóidh an cód seo go leor de na gnéithe i dtábla pivot, mar shampla úsáideoirí a chosc ó aon cheann de na réimsí a tharraingt chuig áit dhifriúil, agus an Liosta Réimse, Socruithe Réimse, Druileáil síos, agus an ghné Athnuachana a dhíchumasú.

2. Má tá táblaí pivot iolracha ar an mbileog ghníomhach, ní chuirtear an cód seo i bhfeidhm ach ar an tábla pivot deireanach.


mboilgeog cheart gorm saighead Cosain tábla pivot ach lig rochtain ar an slicer

Uaireanta, b’fhéidir gur mhaith leat an tábla pivot a chosaint ach rochtain a thabhairt ar an slicer chun an fheidhm scagaire a chur i bhfeidhm, is féidir leis na céimeanna seo a leanas fabhar a thabhairt duit.

1. Tar éis duit an slicer a chur isteach, ansin cliceáil ar dheis air, agus roghnaigh Méid agus Airíonna ón roghchlár comhthéacs, féach an scáileán:

doc tábla pivot 2 a chosaint

2. Sa an Formáid Slicer pane, cliceáil Airíonna chun na roghanna a leathnú, agus ansin díthiceáil Faoi Ghlas rogha, féach an scáileán:

doc tábla pivot 3 a chosaint

3. Ansin dún an phána, agus ansin cliceáil Athbhreithniú > Bileog Cosanta chun an bhileog seo a chosaint, féach an scáileán:

doc tábla pivot 4 a chosaint

4. Sa popped amach Bileog Cosanta bosca dialóige, ansin seiceáil Roghnaigh cealla díghlasáilte agus Úsáid PivotTable & PivotChart roghanna amháin sa Lig d’úsáideoirí uile na bileoige oibre seo bosca liosta, agus ansin cuir isteach an focal faire agus é a dhearbhú, féach an scáileán:

doc tábla pivot 5 a chosaint

5. Ansin cliceáil OK cnaipe chun na dialóga a dhúnadh, agus anois, nuair a chliceálann tú an tuarascáil tábla pivot agus iarracht a dhéanamh í a athrú, ní dhéanfar é a mhodhnú, ach is féidir leat an ghné Slicer a chur i bhfeidhm de réir mar is gá duit.

Uirlisí Táirgiúlachta Oifige is Fearr

🤖 Kutools AI Aide: anailís sonraí a réabhlóidiú bunaithe ar: Forghníomhú Chliste   |  Gin Cód  |  Cruthaigh Foirmlí Saincheaptha  |  Anailís a dhéanamh ar Sonraí agus Cairteacha a Ghin  |  Feidhmeanna Kutools a agairt...
Gnéithe Coitianta: Faigh, Aibhsigh nó Aithnigh Dúblaigh   |  Scrios Sraitheanna Bána   |  Comhcheangail Colúin nó Cealla gan Sonraí a Chailleadh   |   Babhta gan Foirmle ...
Cuardaigh Super: Ilchritéir VLookup    VLookup Illuachanna  |   VLookup Trasna Ilbhileoga   |   Amharc doiléir ....
Liosta anuas Casta: Go tapa Cruthaigh Liosta Anuas   |  Liosta anuas Cleithiúnach   |  Liosta Buail Isteach Ilroghnacha ....
Bainisteoir Colún: Cuir Líon Sonrach Colún leis  |  Colúin Bog  |  Scoránaigh Stádas Infheictheachta na gColún Ceilte  |  Déan comparáid idir Raonta & Colúin ...
Gnéithe Réadmhaoin: Fócas Eangaí   |  Amharc Dearaidh   |   Barra Mór na Foirmle    Leabhar Oibre & Bainisteoir Bileog   |  Leabharlann Acmhainní (Uaththéacs)   |  Piocálaí Dáta   |  Comhcheangail Bileoga Oibre   |  Criptigh/Díchriptigh Cealla    Seol Ríomhphost trí Liosta   |  Scagaire Super   |   Scagaire Speisialta (scagaire trom/iodálach/stailc tríd...) ...
Barr 15 Uirlisí12 Téacs uirlisí (Cuir Téacs, Bain Carachtair,...)   |   50 + Cairt cineálacha (Cairt Gantt,...)   |   40+ Praiticiúil Foirmlí (Ríomh aois bunaithe ar lá breithe,...)   |   19 Insertion uirlisí (Cuir isteach Cód QR, Ionsáigh Pictiúr ón gCosán,...)   |   12 Tiontú uirlisí (Uimhreacha le Focail, Comhshó Airgeadra,...)   |   7 Cumaisc & Scoilt uirlisí (Sraitheanna Comhcheangail Casta, Cealla Scoilt,...)   |   ... agus eile

Supercharge Do Scileanna Excel le Kutools le haghaidh Excel, agus Éifeachtúlacht Taithí Cosúil Ná Roimhe. Kutools le haghaidh Excel Tairiscintí Níos mó ná 300 Ardghnéithe chun Táirgiúlacht a Treisiú agus Sábháil Am.  Cliceáil anseo chun an ghné is mó a theastaíonn uait a fháil ...

Tuairisc


Tugann Tab Oifige comhéadan Tabbed chuig Office, agus Déan Do Obair i bhfad Níos Éasca

  • Cumasaigh eagarthóireacht agus léamh tabbed i Word, Excel, PowerPoint, Foilsitheoir, Rochtain, Visio agus Tionscadal.
  • Oscail agus cruthaigh cáipéisí iolracha i gcluaisíní nua den fhuinneog chéanna, seachas i bhfuinneoga nua.
  • Méadaíonn do tháirgiúlacht 50%, agus laghdaíonn sé na céadta cad a tharlaíonn nuair luch duit gach lá!
Comments (5)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Thank you for this tip. My question is, how do I reverse the code and edit the pivot table now?
This comment was minimized by the moderator on the site
For Each xpf In .PageFields
With pf

а где "х" потеряли?))) должно же быть With xpf
This comment was minimized by the moderator on the site
The macro doesn't work it just throws an object error
This comment was minimized by the moderator on the site
Hi, andrew,
The code works well, after applying the code, you will get the prompt box to remind you the pivot table has been protected, and then close it, now, when changing any data in the pivot table, a warning message box will be pop out.
This comment was minimized by the moderator on the site
Does not work. Get a run error
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations