Help!

PC-Problemen?
De vrijwilligers van Oplossing.be zoeken gratis met u mee!

Hulp bij posten

Recente topics

Auteur Topic: hoe een leeg veld in draaitabel onzichtbaar maken  (gelezen 5340 keer)

0 leden en 1 gast bekijken dit topic.

Offline ANN EECKHAUDT

  • Nieuw lid
  • Berichten: 3
  • Geslacht: Vrouw
  • Oplossing.be
hoe een leeg veld in draaitabel onzichtbaar maken
« Gepost op: 16 september 2020, 15:31:41 »
Ik heb een draaitabel gemaakt maar bij sommige rijen heb ik ook een actieplan en bij anderen niet.
Bij degene waar er geen actieplan is wordt dit dan al een lege rij weergegeven.
Hoe kan ik dit verhelpen? Dit is niet zo mooi.
Bestaat er eventueel de mogelijkheid om een draaitabel de kopiëren naar een nieuw map zonder de opmaak kwijt te zijn?
zie bijlage

Offline cow18

  • Ervaren lid
  • ***
  • Berichten: 340
  • Geslacht: Man
  • Oplossing.be
Re: hoe een leeg veld in draaitabel onzichtbaar maken
« Reactie #1 Gepost op: 17 september 2020, 13:32:08 »
met een beetje VBA, filteren op de lengte van "actieplan"Sub FilterenBlank()
   With ActiveSheet.PivotTables(1)
      For Each it In .PivotFields("actieplan").PivotItems
         it.Visible = (Len(it.Name) > 1)
      Next
   End With
End Sub

Offline ANN EECKHAUDT

  • Nieuw lid
  • Berichten: 3
  • Geslacht: Vrouw
  • Oplossing.be
Re: hoe een leeg veld in draaitabel onzichtbaar maken
« Reactie #2 Gepost op: 17 september 2020, 14:15:08 »
hoe kan ik dit praktisch doen, ken niets van VBA
Waar precies moet ik dit wijzigen

Offline cow18

  • Ervaren lid
  • ***
  • Berichten: 340
  • Geslacht: Man
  • Oplossing.be
Re: hoe een leeg veld in draaitabel onzichtbaar maken
« Reactie #3 Gepost op: 17 september 2020, 14:58:21 »
in de module van blad2 wordt bij het vernieuwen van die draaitabel die macro aangeroepen en de events tijdelijk uitgeschakeld (anders blijf je in een oneindige loop hangen)
in een gewone module (module1) staat dan die macro zelf.
Mogelijks wil je dat filteren niet altijd, dus moet die macro eventueel een beetje gefinetuned worden.


Offline ANN EECKHAUDT

  • Nieuw lid
  • Berichten: 3
  • Geslacht: Vrouw
  • Oplossing.be
Re: hoe een leeg veld in draaitabel onzichtbaar maken
« Reactie #4 Gepost op: 18 september 2020, 08:31:32 »
Sorry, maar dit is voor mij chinees.
Kan jij dit bestand even aanpassen en mij opnieuw doorsturen?
Zodat ik kan zien waar de aanpassingen gebeurd zijn?
Alvast dank bij voorbaat.

Offline cow18

  • Ervaren lid
  • ***
  • Berichten: 340
  • Geslacht: Man
  • Oplossing.be
Re: hoe een leeg veld in draaitabel onzichtbaar maken
« Reactie #5 Gepost op: 18 september 2020, 09:41:31 »
Die kan je toch zien in de meegestuurde bijlage.
Dus in de screenshot die je hierboven al gevonden had en meestuurde met op de linkerkant die boomstructuur (projectverkenner) klik je op blad2 en zie je die ene eventmacro en dan (na eventueel openklappen van "modules" (op het plusje er voor klikken) vind je daar module1 met daarin die andere macro.

Vul in een aantal lege cellen van de L-kolom van blad1 iets in, ga in naar blad2 in de draaitabel staan, klik rechtermuisknop en klik op vernieuwen. Dan vernieuwt de draaitabel zich, waarop automatisch de "Worksheet_PivotTableUpdate"-macro, die in de blad-module van blad2 staat aangeroepen wordt en die stuurt je door naar de macro "FilterenBlank".
Klinkt ingewikkelder dan het is.

Het kon anders ook door alles handmatig te laten doen , dus eerst handmatig vernieuwen en dan handmatig de macro "FilterenBlank" starten, zonder die event-macro.

Gevoelsmatig zou ik bijna zeggen dat je niet gelukkig bent met de oplossing.
Wil je misschien soms die lege regels wel zien, een soort toggle-modus, de éne keer met en daarna zonder ?
Want dan krijg je er ook andere getallen en dus andere subtotalen door.

Misschien een schoonheidstip, ga bv in A8 "Mens" staan, rechtermuisknop, kies "veldinstellingen", tabje "indeling en afdrukken" en zet een vinkje naast "lege regel na iedere itemlabel"

     

 


www.combell.com