Rechnen lassen zugunsten von "Urlaub" oder "Krank"?

Hallo,

Ein kleiner Funktion, der mir viel Rechnerei erspart!
Nun kann es aber sein, das statt Zahlen „Urlaub“ oder „Krank“ in der Zelle eingetragen werden. Hier soll sie auf ihre Rechenleistung verzichten und das Feld räumen um die zwei Wörter die Chance zu geben in Ruhe und für sich stehen bleiben zu können!

Wie könnte das eingebaut werden?

Function rechL(s As Variant) As Variant
If Len(s) < 3 Then
rechL = „“
Else
s = Replace(s, " ", „+“)
s = Replace(s, „,“, „.“)
rechL = -Evaluate(s)
End If
End Function

Für eine Antwort ein herzlichen Dank im voraus!
Zuckerkuss

Excel VBA

Hallo lieber Textroboter,

leider ergibt die Aneinanderreihung der Worte nur wenig Sinn. Der Text ergibt auch oder gerade durch den Bezug zum Programm nicht viel mehr Sinn…

Grüße

Was Du meinst verstehe ich nicht …

Was ich will ist folgendes; Die Funktion dient dazu Arbeitszeiten zu berechnen. Nun gibt es auch Tagen wo nicht gearbeitet -, sondern Urlaub genommen wird, oder Tage an dem man krank ist. Diese If-Anweisung soll in diese Funktion eingebaut werden. Wie könnte das aussehen?

Zuckerkuss