Arbeitstage Negativ und Positiv mit VBA
chris
ich brauche dringend Hilfe weil ichs nicht hinbekomme:(
Ich brauche aus 2 datums die Anzahl der Arbeitstage.Habe selbst versucht was zu basteln aber bekomme da nur die Arbeitstage die im Plus sind aber keine Negativen zahlen.
Damit meine ict ich brauche z.b eine funktion die mir z.B
Das heutige Datum von einem anderen datum abzieht.
2 Datums sind vorgegeben.
10.09.2010 und 20.09.2010
Heute = der 14.09.2010
jetzt brauche ich als ergebniss für den
10.09.2010 = -3 "ArbeitsTage"
und für den
20.09.2010 = 5 "ArbeitsTage"
Wie bekomme ich das hin mit den Minus Tagen? Meine funktion rechnet nur + Tage
hier meine funktion:
Function Anz_nur_Arbeitstage(Start_Datum, Ende_Datum)
Dim L As Date
Dim wieviele_Tage
If Start_Datum = "" Then GoTo leer
For L = DateSerial(Year(Start_Datum), Month(Start_Datum), Day(Start_Datum)) To DateSerial(Year( _
_
Ende_Datum), Month(Ende_Datum), Day(Ende_Datum))
If Weekday(L, vbMonday)