Auteur Topic: draaitabel waarden afronden (gelezen 10086 keer)

robert66 · « **Gepost op:** 17 mei 2008, 07:55:17 »

ik zou graag zien dat de waarden van de totalen van een draaitabel kunnen worden afgerond op hele getallen, nu staat er bijvoorbeeld 3,092, dat zou dan afgerond 1 moeten worden.
het kan volgens mij niet, maar ik hoop dat er iemand een tip heeft hoe dit aan te pakken.
Ik heb wel eens draaitabel ophalen gebruikt, maar dat vind ik nogal bewerkelijk naarmate het aantal velden in de draaitabel toeneemt.

spyder · « **Reactie #1 Gepost op:** 17 mei 2008, 09:50:13 »

Hoi robert,

Kan je niet op het blad waar je de gegevens ophaalt een extra kolom bijmaken waarin je deze afronding doet, en met deze kolom werken in je draaitabel?

spyder

robert66 · « **Reactie #2 Gepost op:** 17 mei 2008, 09:57:17 »

Hoi Spider,

Nee dat is geen optie, hetgaat om werknemers daar is het fte percentage voor ingevuld per werknemer, en ik wil totalen zien per afdeling, maar dan wel graag afgeronde waarden in de draaitabel.

spyder · « **Reactie #3 Gepost op:** 17 mei 2008, 10:50:32 »

Hoi Robert,

Kan je een (uitgeklede) versie van je werkblad eens als voorbeeldje aanhangen? Dit maakt het voor ons wat duidelijker op welke manier je de resultaten wil en kan bekomen.

Mischien dat de echte specialisten je dan ook sneller op weg kunnen helpen.

spyder

robert66 · « **Reactie #4 Gepost op:** 17 mei 2008, 11:54:02 »

ok hierbij een voorbeeld bestandje
hoop dat iemand me er verder mee kan helpen

RedHead · « **Reactie #5 Gepost op:** 19 mei 2008, 21:43:38 »

Robert66, Ik ben bang dat je nu iets wilt, dat echt niet kan. Een Pivot Table (draaitabel) is een zéér krachtige tool om mooie samenvattingen of analyses te maken, maar staat verder niet toe dat je data probeert te wijzigen in de tabel zelf.
Het enige dat ik kan verzinnen is het plaatsen van de afgeronde totalen in kolom F, dus naast je tabel....
Nu we het over de 'totalen' hebben. Is dit wat je bedoelt qua getallen?

Code: [Selecteer]

   F                        G  
 6 Totaal automatisering    0  
 7 Totaal beproeving        2  
 8 Totaal constructie       1  
 9 Totaal directie          2  
10 Totaal engineering       2  
11 Totaal finance           3  
12 Totaal hr                1  
13 Totaal inkoop            3  
14 Totaal produktie         7  
15 Totaal secretariaat      1  
16 Totaal technische dienst 1  
17 Totaal verkoop           2  
18 Eindtotaal               25 

Blad4

[Table-It] version 07 by Erik Van Geit

Dus omdat automatisering slechts minder dan een half FTE krijgt toegekend, zijn er dus géén geregistreerde uren. Is dat ECHT de bedoeling??? Waarom vind je het zo erg om de part-time uren 'niet afgerond' in je totaal per afdeling te zien? Ik denk dat je op die manier namelijk de waarheid geen eer aandoet.

Groet, Leo

robert66 · « **Reactie #6 Gepost op:** 19 mei 2008, 21:54:27 »

Leo,

Het bestandje wat ik heb meegezonden is slechts een voorbeeldje het daadwerkelijke bestand is uitgebreider.
Het is ook niet elke maand hetzelde het kan meer kolommen of rijen bevatten, dus een kolom er naast is geen optie.
Je hebt gelijk als je zegt dat fte afronding de waarheid niet weergeeft, maar ik moet de getallen laten opnemen in een rapportage tool en die vraagt nu eenmaal afgeronde waarde,
Ik heb nu zo gedaan dat ik een berekend veld heb toegevoegd aan de draaitabel, dat berekende veld kan je vervolgens wel afronden, alleen het nadeel daarvan is dat de onderliggende getallen ook worden afgerond.
Dan kan je dus weer verschillen krijgen in subtotalen.
Ik heb tenslotte toch maar besloten om de functie draaitabellenophalen te combineren met het berekende veld. Het is omslachtig maar het werkt wel en ik zie geen betere optie.

Bedankt voor je reactie

RedHead · « **Reactie #7 Gepost op:** 19 mei 2008, 22:19:58 »

Citaat van: Robert66

ik zie geen betere optie

Misschien dan toch wel aardig om ff deze 'code-knutsel' uit te proberen in je testworkbook. (plaatsen in een standaard module van je workbook)

Code: [Selecteer]

Sub AfgerondeTotalen()
Dim rng         As Range
Dim i           As Integer

    For Each rng In Range("A1:A" & ActiveSheet.UsedRange.Rows.Count)
        If InStr(1, UCase(rng.Value), "TOTAAL") > 0 Then
            i = i + 1
            rng.Offset(, 5).Value = rng.Value
            rng.Offset(, 6).Value = Round(rng.Offset(, 4).Value)
            rng.Offset(, 7).Value = i
        End If
    Next rng

End Sub

Nu worden de totalen strak tegen je tabel gezet, maar je kan er natuulijk voor kiezen om dit bijvoorbeeld 20 kolommen verder te plaatsen....

Groet, Leo

robert66 · « **Reactie #8 Gepost op:** 19 mei 2008, 22:28:15 »

ok kan ik proberen, maar de echte sheet bevat meerdere kolommen waarbij een totaal moetkomen.

RedHead · « **Reactie #9 Gepost op:** 19 mei 2008, 22:34:35 »

Robert66, Die 'meerdere kolommen' is geen probleem als je de getallen bij de 'Offset' verhoogt. Waar je nu de 5, 6 en 7 ziet staan, kan je rustig 20, 21 en 22 van maken.

Groet, Leo

EDIT: ik zie nu dat ik je waarschijnlijk verkeerd begrijp.... Je hebt niet alleen bij je FTE een totaal staan, maar er zijn daarbij nog meerdere kolommen in je draaitabel die een totaal gaan leveren? En dat kan iedere periode anders zijn???

robert66 · « **Reactie #10 Gepost op:** 20 mei 2008, 22:02:04 »

Juist, het is afhankelijk van het aantal medewerkers o.a, dus ja dat kan wijzigen.

zie voorbeeld bestandje, er staan nu afgeronde waarden, maar dat zijn eigenlijk normaal gesproken fte waarden(met dec dus)

RedHead · « **Reactie #11 Gepost op:** 20 mei 2008, 23:17:56 »

Robert66, De nu getoonde draaitabel heeft een compleet andere layout dan je eerder geplaatste. Is dit de manier waarop je 'm standaard opbouwt? Die 'basistabel' uit je andere voorbeeld, is dat een standaard opbouw? Kan je anders niet een totaal uit die tabel gaan halen ipv eerst een draaitabel te genereren?

Groet, Leo

robert66 · « **Reactie #12 Gepost op:** 20 mei 2008, 23:24:37 »

de discussie is gestart ivm het feit dat ik iets zocht om onafgeronde waarden van draaitabellen wilde afronden, dan doet de layout er niet zoveel toe.
het eerste voorbeeldjebestand zou dan genoeg moeten zijn.

RedHead · « **Reactie #13 Gepost op:** 20 mei 2008, 23:37:24 »

Citaat van: robert66 op 20 mei 2008, 23:24:37

de discussie is gestart ivm het feit dat ik iets zocht om onafgeronde waarden van draaitabellen wilde afronden,

Tja, daar moet ik je gelijk in geven.

Maar in de verdere zoektocht naar een oplossing is het toch niet ongemakkelijk om te weten wat de uiteindelijke layout is. Mijn oplossing via VBA zou afdoende geweest kunnen zijn om je totalen afgerond in een apart tabelletje te krijgen die dan zo ingelezen kon worden in de rapportage-tool.
Wellicht is het dus mogelijk om eea standaard via Excel op te lossen, maar helaas kan ik je daar niet bij helpen.

Groet, Leo

EDIT: Is het niet mogelijk om de rapportage-tool aan te passen zodat decimalen WEL worden geaccepteerd???

Help!

Menu

Hulp bij posten

Zoeken

Recente topics