Dette tipset lar rapportbrukerne velge mellom flere pivottabellformater ved hjelp av alternativknapper og oppdaterer deretter pivottabellen automatisk! (Kommer godt med når brukere har rapportformatpreferanser uten å måtte gå til verktøylinjen i pivottabellen og velge en hver gang)
Steg en:
Plasser en alternativknapp (eller flere) hvor som helst på pivottabellrapportarket, og navngi dem, for eksempel "Rapportformat 1", "Rapportformat 2" osv …
Gjør dette ved å gå til "Vis> Verktøylinjer> Skjemaer", velg "Alternativ -knapp" fra verktøykassen og dra den til rapporten.
Trinn to:
Lag makroen ved å gå til "Verktøy> Makro> Makroer", skriv inn et navn som "Format2" og deretter "Opprett"
Skriv inn eller klipp ut og lim inn følgende VB -kode. (Merk: Sørg for at pivottabellen er merket som standardnavnet "Pivottabell1" ved å høyreklikke hvor som helst i pivottabellen, velg "Tabellalternativer" og se på "Navn" -feltet. Ellers må du erstatte pivottabellnavnet i koden nedenfor med den som pivottabellen heter):
Underformat2 ()
'Format2 makro
ActiveSheet.PivotTables ("PivotTable1"). PivotSelect "", xlDataAndLabel, True
ActiveSheet.PivotTables ("PivotTable1"). Format xlReport6
Celler. Velg
Med utvalg
.HorizontalAlignment = xlGeneral
.VerticalAlignment = xlBottom
.WrapText = Falsk
. Orientering = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = Falsk
.ReadingOrder = xlContext
Slutt med
Med utvalg
.HorizontalAlignment = xlCenter
.VerticalAlignment = xlBottom
.WrapText = Falsk
. Orientering = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = Falsk
.ReadingOrder = xlContext
Slutt med
Celler. Velg
Selection.Columns.Autofit
Område ("A1"). Velg
Slutt Sub
~~~~~~~~~~~~~~~~~~~~~~~~~
Du kan lage forskjellige makroer i samme format ved å bruke den samme koden, og den eneste linjen du må endre er "Format xlReport6". Det er omtrent 15 rapportformater å velge mellom. Bare endre "xlReport (nummer)" fra 1 til 15.
Koden ovenfor tilpasser også kolonnene automatisk og sentrerer teksten automatisk etter at rapporten er formatert.
Trinn tre:
Tilordne makroen til alternativknappen ved å høyreklikke på alternativknappen, velg "Tildel makro" og velg ganske enkelt makroen du nettopp har opprettet. Gjør dette for hver av alternativknappene
Det er det! Når en bruker klikker på en alternativknapp, oppdateres pivottabellen automatisk til formatet basert på formatalternativet som ble brukt i makroen. Test flere rapportstiler for å se hvilke som passer dine behov, og tilordne dem deretter til makroene og alternativknappene.
Brukerne dine vil være takknemlige og ganske imponert!
Lykke til!
~ CJ