Ich bräuchte dringend eure Hilfe.
Ich hab einen VBA Code gefunden, mit dem ich mehr als 3 Kriterien für eine Formatierung angeben kann, dieser funktionierte auch bestens - für das ganze Tabellenblatt. Ich bräuchte ihn aber nur in der Spalte G von Zeile 12 bis 40 - hab jetzt solange damit rumgespielt, dass gar nix mehr funktioniert..Kann mir bitte jemand helfen und diesen Mist korrigieren?
lg Conny
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Select Target.Value
Case 0 To 10
Target.Interior.ColorIndex = 4
Case 10 To 25
Target.Interior.ColorIndex = 6
Case 25 To 1000
Target.Interior.ColorIndex = 3
Case -10 To 0
Target.Interior.ColorIndex = 4
Case -25 To -10
Target.Interior.ColorIndex = 6
Case -1000 To -24
Target.Interior.ColorIndex = 3
Case Else
Target.Interior.ColorIndex = xlColorIndexNone
End Select
End Sub