Excel vraagje

[sddt]

Ben momenteel bezig met een project, voor dat project heb ik in excel hetvolgende:

Code: Selecteer alles

	        afdeling1	afdeling2	afdeling3	afdeling4 ...
persoon1	    x         x	
persoon2		                         x		
persoon3                 x             x            x
persoon4       x			
...

Nu zou ik graag op een ander werkblad aan de hand van formules hetvolgende krijgen in 2 kolommen (Overal waar een kruisje staat):

Code: Selecteer alles

naam        afdeling
persoon1    afdeling1
persoon1    afdeling2
persoon2    afdeling3
...

'k heb al vanalles zitten proberen zonder resultaat. Is het uberhaupt mogelijk om dit te bereiken met enkel formules. Indien niet, zou het mogelijk zijn met VB?
Iemand een voorstel?

[onurb]

pivot tables ?

[sddt]

Explain

[DIBO]

een draaitabel (pivottable) kan je invoegen ('Invoegen' -> 'Draaitabel') en dan kan je van een lijst...

Code: Selecteer alles

Persoon 	  Afdeling  Aantal
persoon1 	 afdeling1	1
persoon1 	 afdeling3	1
persoon2 	 afdeling3	1
persoon3 	 afdeling2	1
persoon3 	 afdeling3	1
persoon3 	 afdeling4	1
persoon4 	 afdeling1	1

...automatisch een draaitabel te maken

Code: Selecteer alles

  Rijlabels     afdeling1 afdeling2 afdeling3  afdeling4
	persoon1 	        1                  1	
	persoon2 	                        	1		
	persoon3 	               1           1	      1	
	persoon4 	        1

Maar eigenlijk heb jij de omgekeerde weg te gaan en da's niet direct simpel te doen. Wat leesvoer over 'unpivot' : http://superuser.com/questions/78439/is ... t-in-excel

[fvhbrugge]

ik heb al gevonden hoe je de namen een juist aantal keer onder elkaar zet.

Tel het aantal X-en te tellen in een bepaalde rij.
Deze formule werkt =KOLOMMEN(B6:E6)-AANTAL.LEGE.CELLEN(B6:E6)
(B6:E6) kan je vervangen door een naam uiteraard en zo de formule onafhankelijk maken van het aantal afdelingen;

Edit: =+AANTAL.ALS(B6:E6;"X") is natuurlijk nog simpeler.

Dan weet je hoeveel keer een bepaalde naam onder elkaar gezet moeten worden.
Dus het juist aantal keren onder elkaar zetten van namen is geen probleem.
Je moet wel nog bijhouden in welke rij enzovoort die naam staat maar dat is best doenbaar.


Dan moet je een formule maken om het kolomnummer te vinden voor het 1e kruisje in een rijnaam.
De basisformule hiervoor is: =VERGELIJKEN("X";B6:F6;0)

Is er meer dan 1 kruisje dan moet je in de volgende rij het volgende kruisje (2e) zoeken, iets meer naar rechts. Maar zelf vind ik dat ook nog niet...
Het moet mijn inziens wel mogelijk zijn met de functie INDIRECT en ADRES maar ik ben niet gewoon om hiermee te werken.

[tb0ne]

Misschien zo?
http://www.launchexcel.com/pivot-table- ... -crosstab/

[Maglor]

Iets snel ineen geflanst met VBA...


https://www.dropbox.com/s/srdoymc51n2je ... .xlsm?dl=0


wis het onderste tabelletje (= resultaat) en klik op de knop.

[fvhbrugge]

ik zie geen macro in dit bestand??

[meon]

Wat de topicstarter eigenlijk vraagt is het omgekeerde van een draaitabel? Dus van gegevens in een draaitabelvorm terug naar platte lijst krijgen...

[Maglor]

ik zie geen macro in dit bestand??

Er staat nochtans code in hoor (achter de knop). Ik heb wel gemerkt bij het opnieuw openenen van het bestand dat de knop niet lijkt te werken. Ik heb het bestand even aangepast en het zou nu in orde moeten zijn.

[sddt]

Bedankt alvast iedereen voor de reacties!
Het is inderdaad het omgekeerde van een pivot tabel, maar dat blijkt jammer genoeg niet zo simpel te zijn.
Ik heb de links hierboven eens bekeken en denk het toch beter te doen op een andere manier adhv een database.
Het is dan ook niet voor mijn eigen, dus het moet wel gebruiksvriendelijk blijven

PS: @Maglor, dat scriptje zal hier zeker nog van pas komen! Mooi werk!