Overzicht van identieke samenstelling

[Sander321]

Goedenavond,

In de bijlage heb ik een bestand met data toegevoegd.
Deze data komt voor in een groter bestand met verschillende tabbladen en een draaitabel maar dit was te groot om te uploaden.

De data bestaat uit opdrachtnummers, omschrijving, wijken en routes.
Een unieke omschrijving kan meerdere keren voorkomen in dezelfde route omdat iedere route uit meerdere wijken bestaat.

Ik zou deze data graag willen vertalen naar een overzicht wat zich beperkt tot welke routes een identieke samenstelling hebben.
Ik weet bijvoorbeeld a.d.h.v. mijn draaitabel dat routeID 109101, 109102 en 109103 dezelfde samenstelling hebben van omschrijvingen maar dit is vrij onoverzichtelijk om op te zoeken daar er 365 unieke routeID's zijn.

Is dit mogelijk?
Notitie: opdrachtnummers, omschrijving, wijkID en routeID kan iedere week verschillen.

 

[AlexCEL]

Zou je eens aan willen geven voor een aantal regels wat je als uitkomst verwacht? Is mij nu zeer onduidelijk. Wanneer heeft een route een unieke samenstelling?

 

[Sander321]

Beste Alex,

bedankt voor je reactie.
In de bijlage een uitgebreider bestand, hierin is op tabblad 2 een draaitabel terug te vinden.

In deze draaitabel zie je de RouteID's en omschrijving terugkomen.
Indien er een 1 bij staat komt de omschrijving voor in dat routeID.
Hierin is het echter zeer onoverzichtelijk om te herleiden welke RouteID dezelfde samenstelling hebben.

Wat ik zoek is een overzicht waarin visueel goed te zien is welke RouteID dezelfde samenstelling hebben.

 

[Sander321]

Vriendelijk bedankt, dit is precies wat ik zoek!

Ik heb deze macro nu op een nieuw tabblad gezet in mijn bronbestand.
Is er nog een mogelijkheid om deze te filteren / prioriteren op meeste routes met zelfde samenstelling naar minste?

In de zin van:

108601-108606-108618-108625-108629-108651-108773
108881-108883-108884-108891-108893-108894-108896
108441-108443-108445-108446-108447-108448
108458-108468-109121-109125-109295

etc. .

 

[HSV]

Deze twee regels...

.Offset(1).Resize(dict.Count) = Application.Transpose(dict.keys)   'keys (strings) wegschrijven
.Offset(1, 1).Resize(dict.Count) = Application.Transpose(dict.items)   'items (routes) wegschrijven

...kan je samenvoegen tot een.

.Offset(1).Resize(dict.Count, 2) = Application.Transpose(Array(dict.keys, dict.items))

 

[Sander321]

Dit is perfect, wederom vriendelijk bedankt!