Také jednoduché to nie je, lebo Ty zadávaš tvar dátumu a nie číslo a teda za 310150 v dátumovom poňatí nenasleduje 310151 ale 010250

Ale tým prevodom na číselnú hodnotu dátumu by malo ísť niečo poriešiť, len nie všetky funkcie Excelu majú ekvivalent i vo VBA a nie všetky funkcie sú v tvare "Worksheetfunction." využiteľné i vo VBA.
Skúsim niečo vymyslieť ale dnes to nebude, to je trocha na dlhšie (ak Ti to medzitým neporieši niekto iný)

P.S. nadnes musím končiť