Sut i newid gosodiadau maes lluosog yn nhabl colyn?
Pan fyddwch chi'n creu bwrdd colyn mewn taflen waith, ar ôl llusgo'r caeau i'r Gwerthoedd rhestr yn y Rhestr Maes PivotTable, efallai y cewch yr un peth Cyfri swyddogaeth fel y dangosir y screenshot canlynol. Ond nawr, rydych chi eisiau'r Swm o swyddogaeth i ddisodli'r Cyfri o swyddogaeth ar unwaith, sut allech chi newid cyfrifiad sawl maes tabl colyn ar unwaith yn Excel?
Newidiwch y gosodiadau maes yn y tabl colyn â llaw fesul un
Newid gosodiadau maes lluosog yn nhabl colyn gyda chod VBA
Newidiwch y gosodiadau maes yn y tabl colyn â llaw fesul un
Yn Excel, gallwch newid cyfrifiad y gosodiadau maes trwy newid y swyddogaeth fesul un yn y Gwerth Gosodiadau Maes deialog, gwnewch fel hyn:
1. Dewiswch faes yn yr ardal Gwerthoedd rydych chi am newid y swyddogaeth gryno yn y tabl colyn, a chliciwch ar y dde i ddewis Gwerth Gosodiadau Maes, gweler y screenshot:
2. Yna yn y Gwerth Gosodiadau Maes blwch deialog, dewiswch un math o gyfrifo rydych chi am ei ddefnyddio o dan y Crynhowch y Gwerth Gan tab, gweler y screenshot:
3. Ac yna cliciwch OK i gau'r ymgom hwn, a gallwch weld bod eich swyddogaeth Cyfrif wedi'i newid i swyddogaeth Sum, gweler y screenshot:
4. Ailadroddwch y camau uchod i newid gosodiadau cyfrifo meysydd eraill fesul un.
Nodyn: Gallwch hefyd newid gosodiadau'r maes trwy glicio ar y dde un gell maes a dewis Crynhoi Gwerthoedd gan a dewiswch un cyfrifiad sydd ei angen arnoch o fwydlenni cyd-destun.
Newid gosodiadau maes lluosog yn nhabl colyn gyda chod VBA
Bydd y dull uchod yn cymryd llawer o amser ac yn ddiflas os oes angen newid llawer o gyfrifiadau maes, yma, gallaf gyflwyno cod i chi i newid gosodiadau wedi'u ffeilio lluosog ar yr un pryd.
1. Cliciwch unrhyw gell yn eich bwrdd colyn.
2. Daliwch i lawr y ALT + F11 allweddi, ac mae'n agor y Ffenestr Microsoft Visual Basic for Applications.
3. Cliciwch Mewnosod > Modiwlau, a gludwch y cod canlynol yn y Ffenestr Modiwl.
Cod VBA: Newid gosodiadau maes lluosog yn nhabl colyn
Public Sub SetDataFieldsToSum()
'Update 20141127
Dim xPF As PivotField
Dim WorkRng As Range
Set WorkRng = Application.Selection
With WorkRng.PivotTable
.ManualUpdate = True
For Each xPF In .DataFields
With xPF
.Function = xlSum
.NumberFormat = "#,##0"
End With
Next
.ManualUpdate = False
End With
End Sub
4. Yna pwyswch F5 allwedd i weithredu'r cod hwn, ac mae'r holl leoliadau maes yn eich tabl colyn a ddewiswyd wedi'u trosi i'ch cyfrifiad angen ar unwaith, gweler sgrinluniau:
Nodyn: Yn y cod uchod, gallwch newid y swyddogaeth Swm i unrhyw gyfrifiadau eraill, fel Cyfartaledd, Max, Min fel y dymunwch. 'Ch jyst angen i chi newid y Swm yn y sgriptiau hyn: Is-set GyhoeddusDataFieldsToSum () ac .Swyddogaeth = xlSum i swyddogaethau eraill.
Offer Cynhyrchiant Swyddfa Gorau
Supercharge Eich Sgiliau Excel gyda Kutools ar gyfer Excel, a Phrofiad Effeithlonrwydd Fel Erioed Erioed. Kutools ar gyfer Excel Yn Cynnig Dros 300 o Nodweddion Uwch i Hybu Cynhyrchiant ac Arbed Amser. Cliciwch Yma i Gael Y Nodwedd Sydd Ei Angen Y Mwyaf...
Mae Office Tab yn dod â rhyngwyneb Tabbed i Office, ac yn Gwneud Eich Gwaith yn Haws o lawer
- Galluogi golygu a darllen tabbed yn Word, Excel, PowerPoint, Cyhoeddwr, Mynediad, Visio a Phrosiect.
- Agor a chreu dogfennau lluosog mewn tabiau newydd o'r un ffenestr, yn hytrach nag mewn ffenestri newydd.
- Yn cynyddu eich cynhyrchiant 50%, ac yn lleihau cannoedd o gliciau llygoden i chi bob dydd!