Excelformel ändern für VB6.0
13.02.2007 14:16:00
ray
ich habe folgende Excelformel(natürlich von hier), die ich nicht für mein VB6.0 projekt umgefummelt bekomme.
Kennst sich hier jemand damit aus?
Formel:
WENN(TAG(C21)>3;DATUM(JAHR(C21);MONAT(C21)+4;0);DATUM(JAHR(C21);MONAT(C21)+3;0))
c21 = heutiges Datum
Ziel:
Wenn der heutige Tag größer 3 (z. B. 05,02,2007) dann addiere zum Monat 3 Monate dazu und setzte Tag auf den letzten des ermittelten Monats. Sonst addi nur 2 dazu.
Bei heute = 05,02,2007 soll das Ergebnis 31.05.2007 sein.
Bei heute = 03,02,2007 soll das Ergebnis aber 30.04.2007 sein.
Grüße aus der Nachbarschaft
ray