Hallo iedereen,
Ik maak gebruik van een macro om een planning van me te automatiseren. In deze planning wordt op basis van de leverdatum van het product, een datum berekend waarop bepaalde werkzaamheden gereed moeten zijn zodat de leverdatum gerespecteerd kan worden.
Voorbeeld:
Leverdatum product is 01-03-2010
Benodigde verwerkingstijd = 5 dagen
Datum Werkzaamheden gereed = Leverdatum - 5 Werkdagen = 22-02-2010
Ik maak in mijn macro gebruik van de Workday functie, maar ik krijg het niet voor elkaar deze functie terug te laten tellen. Ik weet dat ik het 2e argument negatief moet maken, maar als ik dit doe door simpelweg een minteken toe te voegen, werkt de code niet. Wat doe ik fout? De gebruikte code:
Zorgt ervoor dat de macro niet wordt afgewerkt.
Wie helpt me met deze (waarschijnlijk oersimpele) fout?
Ik maak gebruik van een macro om een planning van me te automatiseren. In deze planning wordt op basis van de leverdatum van het product, een datum berekend waarop bepaalde werkzaamheden gereed moeten zijn zodat de leverdatum gerespecteerd kan worden.
Voorbeeld:
Leverdatum product is 01-03-2010
Benodigde verwerkingstijd = 5 dagen
Datum Werkzaamheden gereed = Leverdatum - 5 Werkdagen = 22-02-2010
Ik maak in mijn macro gebruik van de Workday functie, maar ik krijg het niet voor elkaar deze functie terug te laten tellen. Ik weet dat ik het 2e argument negatief moet maken, maar als ik dit doe door simpelweg een minteken toe te voegen, werkt de code niet. Wat doe ik fout? De gebruikte code:
Dit werkt wel, maar telt de toekomst in. Deze code:dl.Offset(0, 8).Value = WorksheetFunction.WorkDay(dl.Offset(0, 6).Value, dl.Offset(0, 7).Value)
dl.Offset(0, 8).Value = WorksheetFunction.WorkDay(dl.Offset(0, 6).Value, -dl.Offset(0, 7).Value)
Zorgt ervoor dat de macro niet wordt afgewerkt.
Wie helpt me met deze (waarschijnlijk oersimpele) fout?