Laatste Zaterdag van de maand met VBA

[DutchOirs]

Goedenavond allen,

Om de laatste Zaterdag van de maand te vinden (datum) heb ik een excel formule gevonden.

nl. op http://www.schoutsen.nl/category/excel-formules/datum-en-tijd

werkt perfect. Maar nu de vraag, is deze ook met VBA te maken?

vb-tje bijgevoegd.

Al many thanks.

Vr. Gr.

Dutch

 

[HSV]

de formule evalueren.

.Range("B5") = [EOMONTH(A1,0)+1+MOD((-WEEKDAY(EOMONTH(A1,0)+1)+7),7)-7]

 

[DutchOirs]

Hoi HSV,

Thanks mooie oplossing kon ik nog niet.

Vr. Gr.

Dutch