ich habe einen Code, der auch ganz wunderbar funktioniert.
Dieser Code bewirkt, das mir Excel im Bereich von B5 bis CM 58 immer
zwei Spalten vorher die entsprechende Zelle färbt ( z.B.: F5 = 3 dann
ist D 5 rot )
Nun meine Frage: ich möchte den Bereich gerne einschränken, nicht
von B5 bis CM58 sondern gezielter, d.h. von F5 : F 58 und den gleichen
Bereich für die Spalten: L,R,X,AD,AJ,AP ( immer von Zeile 5 bis 58 )
Da auch nach langem Probieren kein Licht im Tunnel zu entdecken war,
möchte ich Euch fragen, ob jemand eine Idee hat, wie man den Code s.u.
ändern müßte, damit es funktioniert ?
Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Range
On Error Resume Next
If Not Intersect(Target, Range("B5:CM58")) Is Nothing And Target.Count = 1 Then
For Each C In Range("B5:CM58")
If C.Value "" Then C.Offset(, -2).Interior.ColorIndex = C.Value
Next
End If
End Sub
Viele Grüße aus dem Teutoburger WaldRalf