Ich habe eine ganze einfache Funktion hinter einen Button gelegt, die mir in Abhängig ders Wertes in den ersten 10 Spalten der ersten Zeile die Hintergrundfarbe ändert. Die Funktion macht auch das was sie soll.<br>
<br>>
Phänomen: Nach dem Durchlaufen der Funktion wird der Zellenhintergund ab der 11.ten Spalten bei EIngabe einer Zahl automatisch auch auf die Farbe 255 geändert (bei Chacter nicht)<br>
<br>
Wo kann hier das Problem liegen?<br>
<br>
Funktion;<br>
<br>
Worksheets(1).Activate<br>
For i = 1 To 10<br>
Cells(1, i).Select<br>
If Cells(1, i) > 5 Then<br>
With Selection.Interior<br>
.Color = 255<br>
End With<br>
Else<br>
With Selection.Interior<br>
.Color = xlNone<br>
End With<br>
End If<br>
Next