Straatnaam op basis van postcode VBA

[Schelledraad]

Ik heb dit bestand op internet gevonden. Het werkt prima (alhoewel ik het maar half begrijp).
Nu wil ik het sheet kopiëren naar mijn werkbestand en dan loop het vast op regel 11 c01 = Join(Filter(sv, "_" & Trim(UCase(sn(1, 4))) & "_"), "")

Kent iemand een oplossing ?

 

[HSV]

In je eigen bestand is kolom T ook gevuld met gegevens?

 

[Schelledraad]

In het tabblad niet, in andere tabbladen wel.

 

[HSV]

Dan zou je naar dat tabblad kunnen/moeten verwijzen waar de gegevens wel staan.

sv = Application.Transpose(sheets("tabbladnaam").Cells(1, 20).CurrentRegion)