Zellmarkierung
25.08.2019 20:55:01
Noob
ich habe folgendes Problem:
ich möchte nur die Zellen in Spalte B bis G in der Zeile der aktiven Zelle farbig hervorheben.
Mein bisheriger Quellcode sieht so aus:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
With ActiveCell
Range(Cells(.Row, 0.2), Cells(.Row, 0.7)).Interior.ColorIndex = 6
End With
End Sub
Zudem soll bei Auswahl einer anderen Zelle die farbige Kennzeichnung "mitwandern". Die Auswahl einer Zelle ist auf Grund des Blattschutzes, den ich beim Anklicken deaktiviere und anschließend wieder aktiviere nur innerhalb des gewünschten Bereiches möglich.
Ich habe in dem Formular zudem weitere farblich hinterlegte Zellen, die Ihre Farbe behalten sollen, wodurch
ActiveSheet.UsedRange.EntireRow.Interior.ColorIndex = xlNone
leider nicht funktioniert.
Hat da vielleicht jemand ne Lösung zu?
Danke und Gruß, Noob