Range anpassen
05.08.2020 20:42:24
Frank
ich habe den untenstehenden Code um eine Bedingte Formatieren zu erstellen.
gibt es eine Möglichkeit den Code anzupassen, dass ich nicht immer den Bereich händig anpassen muss wenn sich einmal was ändert
With Range("A4,E4,I4,M4,M11,I11,E11,A11,A18,E18,I18,M18,A25,E25,I25,M25,A32,E32,I32,M32,A39,E39, _
I39,M39,A46,E46,I46,M46,A53,E53,I53,M53,A60,E60,I60,M60,A67,E67,I67,M67")
.FormatConditions.Add Type:=xlExpression, Formula1:="=D4=""a"""
.FormatConditions(7).Interior.Color = 6724095
End With
von e4 auf f4 von i4 auf k4
erst waren immer 4 Spalten dazwischen, jetzt sind es 5 Spalten
ich hoffe das war so halbwegs verständlich
danke
Frank
Anzeige