von Stephan » Di, 02.07.2013 10:00
benutze eine benutzerdefinierte Funkttion, z.B.:
Code: Alles auswählen
Function nettoarbeitstage_intl(Startdatum, Arbeitstage)
zrt = 0
For i = 1 To Arbeitstage
tmp = Weekday(DateValue(Startdatum) + i)
If not(tmp = 1) Then zrt = zrt + 1
Next i
nettoarbeitstage_intl = DateValue(Startdatum) + zrt
End Function
aufrufen im Tabellenblatt mit z.B.:
=nettoarbeitstage_intl("06.07.2013"; 4)
Gruß
Stephan
benutze eine benutzerdefinierte Funkttion, z.B.:
[code]Function nettoarbeitstage_intl(Startdatum, Arbeitstage)
zrt = 0
For i = 1 To Arbeitstage
tmp = Weekday(DateValue(Startdatum) + i)
If not(tmp = 1) Then zrt = zrt + 1
Next i
nettoarbeitstage_intl = DateValue(Startdatum) + zrt
End Function[/code]
aufrufen im Tabellenblatt mit z.B.:
=nettoarbeitstage_intl("06.07.2013"; 4)
Gruß
Stephan