Selectief Transponeren

[Joske2000]

Hallo,

Ik zou graag binnen mijn excel sheet het volgende verwezenlijken.
Voor elke product een nieuwe kolom, met daaronder de respectievelijke lotnummers.
Ik ben al aan het werk geweest met VBA, met de functie transponeren, maar ik geraak er niet echt uit.
In het voorbeeldje een idee hoe ik het graag had gewild

Bedankt voor het meedenken.

Joske

 

[Breuk132]

Hallo Joske,

Het kan ook zonder VBA.

formule voor lotnr:

=ALS(RIJ(D2)-1>AANTAL.ALS($A$2:$A$15;E$1);"";INDEX($B$2:$B$15;VERGELIJKEN(E$1;$A$2:$A$15;0)+RIJ(D2)-2))

formule voor SnNr:

=ALS(RIJ(E2)-1>AANTAL.ALS($A$2:$A$15;E$1);"";INDEX($C$2:$C$15;VERGELIJKEN(E$1;$A$2:$A$15;0)+RIJ(E2)-2))

Voorwaarde is wel dat de producten op volgorde staan.

 

[WHER]

Alternatief waarbij de producten niet op volgorde moeten staan (denk ik).

 

[sylvester-ponte]

hoi Joske

ik vind deze formule oplossingen best heel mooi hoor,
maar je bestand wordt wel snel heel groot.
met een macro gaat het natuurlijk ook.

als daar nog interesse voor is "hoor" ik het wel.

groet sylvester

ps WHER er gaat iets mis als ik cel A2 (dat is Product 1) delete.
als ik het weer ongedaan maak gaat het niet van zelf weer goed.

 

[Joske2000]

Hi Guys,

Werkt perfect. Thanks ! :thumb::thumb:

@ Sylvester-Ponte : Als je het via VBA kan uitwerken voor mij ben ik helemaal super happy, want met de matrixformules van Wher gaat ie wel langzaam lopen.

Thanks,

Joske

 

[WHER]

Een poging om via VBA hetzelfde resultaat te krijgen.

 

[Joske2000]

Bedankt WHER,

Werkt zoals het hoort.

Thanks,

Joske :thumb:

 

[sylvester-ponte]

hoi Joske en WHER

ik heb een regeltje toe gevoegd om de oude gegevens eerst te verwijderen

groet sylvester

 

[WHER]

Dat is inderdaad wel handig, daar had ik niet bij stilgestaan.