kann man eine Konstellation wie diese
...
With .Range(A1)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
With .Range(A2)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
With .Range(A3)
.Interior.ColorIndex = 24
.Font.ColorIndex = 24
End With
...usw....
nicht irgendwie kürzer fassen?
Grüße - Jörg