Hintergrundfarbe bei Eintrag in Zelle von Zeile übernehmen - sonst Zelle rot (vba)
Hallo,
der Teil If .Column = 11 Then im Code von sbColor wird nie erreicht, weil Du diesen im If-Teil von Spalte 9 drin hast.
Von daher, füge ein End If vor If .Column = 11 ein und nehme ein End If unten weg.
Eine bessere Übersicht über die If's und End If's würdest Du errreichen, wenn Du die Code-Teile sauber einrücken würdest.
Gruß
der Teil If .Column = 11 Then im Code von sbColor wird nie erreicht, weil Du diesen im If-Teil von Spalte 9 drin hast.
Von daher, füge ein End If vor If .Column = 11 ein und nehme ein End If unten weg.
Eine bessere Übersicht über die If's und End If's würdest Du errreichen, wenn Du die Code-Teile sauber einrücken würdest.
Gruß
Microsoft Excel Expert · Microsoft Most Valuable Professional (MVP) :: 01/2011 - 06/2019 :: 04/2020 - 06/2022
https://de.excel-translator.de/translator :: Online Excel-Formel-Übersetzer :: Funktionen :: Fehlerwerte :: Argumente :: Tabellenbezeichner (neu)
https://de.excel-translator.de/translator :: Online Excel-Formel-Übersetzer :: Funktionen :: Fehlerwerte :: Argumente :: Tabellenbezeichner (neu)
