Formfarbe in Abhänigkeit von Text
05.12.2021 17:50:09
Text
Aktuell sitze ich an einem Problem. Ich möchte das die Formfarbe sich ändert wenn ein bestimmter Text in der "letzten" beschrieben Zelle (L15:L31) steht. Das die Formfarbe sich korrekt ändert sobald der Text in der Zelle steht war absolut kein Problem, aber irgendwie tu ich mich grad schwer mit dem Befehl das immer die letzte Beschrieben Zelle im genannt Bereich ausschlaggebend ist.
'Private Sub Worksheet_Change(ByVal Target As Range)
'letzte Zeile finden
'letztezeile = ActiveSheet.Cells(31, 11).End(xlUp).Row
'Farbe ändern wenn Text passt
'If Range("K15").Value = "Programmieren" Then
'Call Programmieren_Drehen
'ElseIf Range("K15").Value = "Rüsten" Then
'Call Rüsten_Drehen
'ElseIf Range("K15").Value = "Backen drehen" Then
'Call Backen_Drehen
'ElseIf Range("K15").Value = "Probelauf" Then
'Call Probelauf_Drehen
'ElseIf Range("K15").Value = "Rüsten unterbrochen" Then
'Call Unterbruch_Drehen
'ElseIf Range("K15").Value = "Rüsten unterbrochen" Then
'Call Fertig_Drehen
'ElseIf Range("K15").Value = "" Then
'Call Leer_Drehen
'End If
'End Sub
Merci schonmal für eure Hilfe.
Lieber Gruss Tony
