Hoe bepaalde dagen eruit halen (daggetal)?

[emielDS]

dan zoiets?

d.xlsm

[bakerman]

Gegevens rij per rij inlezen vanuit het werkblad en verwerken is de slechtste en traagste methode in VBA.

 

Zeker als de dataset 4K rijen, en groeiende is.

 

Ik heb beide codes achter een verschillend werkblad gezet met een dataset van 5K rijen. typ in de gele cellen bv. 8 in en let op het tijdsverschil

 

om +/- 350 resultaatrijen op te halen.

d_ba.xlsm

[dreivilo47]

Bedankt voor de bestanden @emielDS en @bakerman.

 

Wat kan ik nu het beste doen?:
1) VBA-code uit jullie Excelbestand kopiëren naar mijn bestand?
2) Data uit mijn Excelbestand kopiëren naar jullie bestand?  Dit geeft vermoedelijk de minste kans op fouten.

[bakerman]

Optie 2 lijkt mij het veiligste.

 

Let wel moest je mijn methode kiezen en je wil de bladnaam wijzigen dan moet je bij

 

Formules - Namen Beheren deze wijziging ook 2x doen bij het benoemd bereik data

[dreivilo47]

Ok, data dus.

 

Bedankt voor de info.  Ik ben niet van plan bladnamen te wijzigen, alleen maar data kopiëren.

 

In de week van 26-12 laat ik weten hoe het gegaan is.

 

Prettige Eindejaarsfeesten @bakerman en @emielDS!

[emielDS]

Voor u en uw naasten hetzelfde.

[bakerman]

Voor jou uiteraard hetzelfde toegewenst.

 

Voor de sport een nog snellere methode dan mijn vorige code (2x sneller)

AdvancedFilter.xlsm

[dreivilo47]

@bakerman, ik heb een foutje in je bestand "AdvancedFilter.xlsm" gevonden.

Wanneer ik je 5012 rijen data reduceer tot 20 rijen data en dan daggetal 1 ingeef, zegt de messagebox: "Er zijn 19 van de 20 datums gevonden".  In plaats van 20 van de 20.  Het laatste record laat hij niet zien rechts(onder).

[bakerman]

Bij data1 in Formules - Namen Beheren verwijder de -1. Dan is je probleem opgelost.

[dreivilo47]

4 uren geleden, bakerman zei:

Bij data1 in Formules - Namen Beheren verwijder de -1. Dan is je probleem opgelost.

Bedankt voor de snelle info, is inderdaad opgelost.

 

Ik ga nog verder testen, tot binnenkort.