Formule als VBA

[Tweety1]

Hoe kan ik onderstaande formule als VBA code gebruiken (zonder hulp kolom)
Starten in F2 tot laatste cel in zelfde kolom

=ALS(1;VERSCHUIVING('CvB weeken'!$A$2;VERGELIJKEN(I2;Datum1[Datum];1)-1;2;1;1);"")

mvg
Kasper

 

[VenA]

als(1;;)

geeft altijd WAAR

Dus een bestandje en een concrete vraag lijkt mij handig.

 

[Tweety1]

Hierbij een voorbeeld.
Bekijk bijlage Voorbeeld.xlsx
De bedoeling is dat uitkomst die in kolom G staat wordt getoond in F zonder een hulp kolom te gebruiken.

 

[VenA]

Welke logica zit erin? Elke datum in de tabel is uniek dus hoe je dit wil opsplitsen? En de als in de formule slaat natuurlijk nergens op. Zie ook #2

 

[Tweety1]

Heb de formule aangepast

=ALS.FOUT(VERSCHUIVING('CvB weeken'!$A$2;VERGELIJKEN(F2;Datum[Datum];1)-1;3;1;1);"")

Ik weet ook niet hoe je dat gaat opsplitsen.
Ik dacht dat het mischien mogelijk is via VBA maar als dat niet lukt dan zal het via een hulp kolom moeten doen.