Wie kann ich die Formel umschreiben, dass nicht 0 die Funktion beendet, sondern wenn nichts in der Zelle steht?
If Beginn = 0 Or Ende = 0 Then Exit Function
Danke Tobi
Wie kann ich die Formel umschreiben, dass nicht 0 die Funktion beendet, sondern wenn nichts in der Zelle steht?
If Beginn = 0 Or Ende = 0 Then Exit Function
Danke Tobi
if Beginn = "" ....
Gruß
Peter
habe es versucht, aber mit in dieser Formel gibt er mir den Fehler #WERT an. Geht also nicht. Noch ein Vorschlag?
Function AZ(Beginn As Date, Ende As Date)
If Beginn = "" Or Ende = "" Then Exit Function
Application.Volatile
If Beginn < Ende Then
Select Case Ende - Beginn
Case Is <= CDate("5:59")
AZ = Ende - Beginn
Case Is <= CDate("8:59")
AZ = Ende - Beginn - CDate("0:30")
Case Else
AZ = Ende - Beginn - CDate("1:00")
End Select
Else
Select Case 1 - Beginn + Ende
Case Is <= CDate("5:59")
AZ = 1 - Beginn + Ende
Case Is <= CDate("8:59")
AZ = 1 - Beginn + Ende - CDate("0:30")
Case Else
AZ = 1 - Beginn + Ende - CDate("1:00")
End Select
End If
End Function
Danke
Tobi
ändere den Anfang wie folgt:
Gruß
Peter