Hallo,
mit der ganz untenstehende Funktion werden, wenn in einer Zelle „22“ geschrieben wird, unter der Spalte „Nachtbereitschaft“ den über den „22“ stehende Namen (Zeile8) eingeschrieben.
Jedoch hat die arme Stella Schön unter „Nachtbereitschaft“ noch keinen Platz. Wie kann ich auch sie mit einbauen?
Eine zweite Frage ist, dass im Moment unter der Spalte „Nachtbereitschaft“ Vor- und Nachname ausgegeben werden, möchte aber gerne, um Platz zu sparen, dass nur der Nachname erscheint. Wie ist das zu bewerkstelligen?
Für Eure Antwort bin ich dankbar!
Zuckerkuss
Function Nacht(FbisM As Range, FbisMP As Range) As Variant
Dim i&
'Stop
If FbisM.Count <> 12 Then
Nacht = "#F-M?"
Else
If FbisMP.Count <> 12 Then
Nacht = "#F-M?"
Else
Nacht = ""
For i = 1 To 11 Step 2
If Len(FbisM(i)) > 3 Then
If Right(Trim(FbisM(i)), 2) = "22" Then Nacht = Nacht & FbisMP(i) & " "
End If
Next
End If
End If
End Function